diff options
| -rw-r--r-- | translate/ppvernacnew.ml | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/translate/ppvernacnew.ml b/translate/ppvernacnew.ml index 2996c0aecc..bfebda362a 100644 --- a/translate/ppvernacnew.ml +++ b/translate/ppvernacnew.ml @@ -482,6 +482,7 @@ let rec pr_vernac = function | LocateTerm qid -> pr_reference qid | LocateFile f -> str"File" ++ spc() ++ qs f | LocateLibrary qid -> str"Library" ++ spc () ++ pr_reference qid + | LocateNotation s -> str ("\""^s^"\"") in str"Locate" ++ spc() ++ pr_locate loc | VernacComments l -> hov 1 (str"Comments" ++ spc() ++ prlist_with_sep sep (pr_comment pr_constr) l) | VernacNop -> str"Proof" |