aboutsummaryrefslogtreecommitdiff
path: root/interp/constrintern.mli
diff options
context:
space:
mode:
authorHugo Herbelin2018-10-16 10:25:41 +0200
committerHugo Herbelin2018-10-31 18:22:41 +0100
commit9f9591fd0fad76af5f0fcfee5ec665a9e246b931 (patch)
tree3a9fca778a267bd3049b930d6984b037867dcba0 /interp/constrintern.mli
parentba110aab290cecc8847f3bc3b8396d5d1b9493b0 (diff)
Fixes rest of #3468 (tactic-in-term was not respecting scopes).
We do it by passing interning env to ltac interning. Collecting scopes was already done by side-effect internally to Constrintern. We expose the side-effect to ltac.
Diffstat (limited to 'interp/constrintern.mli')
-rw-r--r--interp/constrintern.mli7
1 files changed, 7 insertions, 0 deletions
diff --git a/interp/constrintern.mli b/interp/constrintern.mli
index dd0944cc48..147a903fe2 100644
--- a/interp/constrintern.mli
+++ b/interp/constrintern.mli
@@ -185,6 +185,13 @@ val interp_notation_constr : env -> ?impls:internalization_env ->
notation_interp_env -> constr_expr ->
(bool * subscopes) Id.Map.t * notation_constr * reversibility_status
+(** Idem but to glob_constr (weaker check of binders) *)
+
+val intern_core : typing_constraint ->
+ env -> evar_map -> ?pattern_mode:bool -> ?ltacvars:ltac_sign ->
+ Genintern.intern_variable_status -> constr_expr ->
+ glob_constr
+
(** Globalization options *)
val parsing_explicit : bool ref