diff options
| author | Pierre-Marie Pédrot | 2018-05-24 01:05:09 +0200 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2018-05-24 01:05:09 +0200 |
| commit | 9df6df865fc71ed9840fc569d3aa3cc7cf4750aa (patch) | |
| tree | 8965b5d9bc37bc7d0be341dc311fef6df43c3616 /interp/implicit_quantifiers.ml | |
| parent | b74d9500e5943317f1baf4f36b3d979d40f6105f (diff) | |
| parent | b4b515c2e61bc6ea662b48e84eb319ec8252b07d (diff) | |
Merge PR #6515: [api] Move `Vernacexpr` to parsing.
Diffstat (limited to 'interp/implicit_quantifiers.ml')
| -rw-r--r-- | interp/implicit_quantifiers.ml | 2 |
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 |