diff options
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/grammar.mllib | 1 | ||||
| -rw-r--r-- | parsing/tacextend.ml4 | 2 | ||||
| -rw-r--r-- | parsing/vernacextend.ml4 | 2 |
3 files changed, 3 insertions, 2 deletions
diff --git a/parsing/grammar.mllib b/parsing/grammar.mllib index 02e27827b..30376eeda 100644 --- a/parsing/grammar.mllib +++ b/parsing/grammar.mllib @@ -8,6 +8,7 @@ Flags Segmenttree Unicodetable Util +Errors Bigint Dyn Hashcons diff --git a/parsing/tacextend.ml4 b/parsing/tacextend.ml4 index ec305ee2e..2fe1fdda7 100644 --- a/parsing/tacextend.ml4 +++ b/parsing/tacextend.ml4 @@ -163,7 +163,7 @@ let declare_tactic loc s cl = (Tacexpr.TacAtom($default_loc$, Tacexpr.TacExtend($default_loc$,s,[])))) $atomic_tactics$ - with e -> Pp.pp (Cerrors.explain_exn e); + with e -> Pp.pp (Errors.print e); Egrammar.extend_tactic_grammar $se$ $gl$; List.iter Pptactic.declare_extra_tactic_pprule $pp$; } >> ]) diff --git a/parsing/vernacextend.ml4 b/parsing/vernacextend.ml4 index cc3bd07e8..88a750792 100644 --- a/parsing/vernacextend.ml4 +++ b/parsing/vernacextend.ml4 @@ -54,7 +54,7 @@ let declare_command loc s nt cl = declare_str_items loc [ <:str_item< do { try Vernacinterp.vinterp_add $mlexpr_of_string s$ $funcl$ - with e -> Pp.pp (Cerrors.explain_exn e); + with e -> Pp.pp (Errors.print e); Egrammar.extend_vernac_command_grammar $mlexpr_of_string s$ $nt$ $gl$ } >> ] |