diff options
| author |  Maxime Dénès <mail@maximedenes.fr> | 2018-05-30 16:43:14 +0200 |
|---|---|---|
| committer | Maxime Dénès <mail@maximedenes.fr> | 2018-05-30 16:43:14 +0200 |
| commit | b75f714c025b51ed8b4db15bfce99df2d6ae7c41 (patch) | |
| tree | 4c25d6cbc0d6f62450c15ebdda03a3ada717c8e1 /vernac/vernacentries.ml | |
| parent | b1714dcc7df330df92a935f202964a1e73e44652 (diff) | |
| parent | 7c62654a4a1c0711ebdd492193bb8b7bd0e4f1fb (diff) | |
Merge PR #7558: [api] Make `vernac/` self-contained.
Diffstat (limited to 'vernac/vernacentries.ml')
| -rw-r--r-- | vernac/vernacentries.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/vernac/vernacentries.ml b/vernac/vernacentries.ml index 65490bbbc..9a7f59085 100644 --- a/vernac/vernacentries.ml +++ b/vernac/vernacentries.ml @@ -977,7 +977,7 @@ let vernac_remove_hints ~atts dbs ids = let vernac_hints ~atts lb h = let local = enforce_module_locality atts.locality in - Hints.add_hints local lb (Hints.interp_hints atts.polymorphic h) + Hints.add_hints ~local lb (Hints.interp_hints atts.polymorphic h) let vernac_syntactic_definition ~atts lid x y = Dumpglob.dump_definition lid false "syndef"; @@ -1971,7 +1971,7 @@ let vernac_load interp fname = interp x in let parse_sentence = Flags.with_option Flags.we_are_parsing (fun po -> - match Pcoq.Gram.entry_parse Pcoq.main_entry po with + match Pcoq.Gram.entry_parse Pvernac.main_entry po with | Some x -> x | None -> raise End_of_input) in let fname = |