aboutsummaryrefslogtreecommitdiff
path: root/interp/implicit_quantifiers.ml
diff options
context:
space:
mode:
authorEmilio Jesus Gallego Arias2018-05-19 16:54:01 +0200
committerEmilio Jesus Gallego Arias2018-05-23 13:23:29 +0200
commitb4b515c2e61bc6ea662b48e84eb319ec8252b07d (patch)
treee2b501a4cfe8915ce7c179672b1eae3aa5f7e205 /interp/implicit_quantifiers.ml
parente87288450d4d9e49ac91d179714a73bd0147c0d7 (diff)
[api] Move `Vernacexpr` to parsing.
There were a few spurious dependencies on the `Vernac` AST in the pretyper, we remove them and move `Vernacexpr` and `Extend` to parsing, where they do belong more.
Diffstat (limited to 'interp/implicit_quantifiers.ml')
-rw-r--r--interp/implicit_quantifiers.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/implicit_quantifiers.ml b/interp/implicit_quantifiers.ml
index 58df9abc4a..289890544f 100644
--- a/interp/implicit_quantifiers.ml
+++ b/interp/implicit_quantifiers.ml
@@ -58,7 +58,7 @@ let in_generalizable : bool * Misctypes.lident list option -> obj =
classify_function = (fun (local, _ as obj) -> if local then Dispose else Keep obj)
}
-let declare_generalizable local gen =
+let declare_generalizable ~local gen =
Lib.add_anonymous_leaf (in_generalizable (local, gen))
let find_generalizable_ident id = Id.Pred.mem (root_of_id id) !generalizable_table