aboutsummaryrefslogtreecommitdiffhomepage
path: root/interp/constrarg.ml
diff options
context:
space:
mode:
Diffstat (limited to 'interp/constrarg.ml')
-rw-r--r--interp/constrarg.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/interp/constrarg.ml b/interp/constrarg.ml
index aad034c05..9c1382ba1 100644
--- a/interp/constrarg.ml
+++ b/interp/constrarg.ml
@@ -24,7 +24,7 @@ let unsafe_of_type (t : argument_type) : ('a, 'b, 'c) Genarg.genarg_type =
let wit_int_or_var = unsafe_of_type IntOrVarArgType
-let wit_intro_pattern : intro_pattern_expr located uniform_genarg_type =
+let wit_intro_pattern : (Constrexpr.constr_expr intro_pattern_expr located, glob_constr_and_expr intro_pattern_expr located, constr intro_pattern_expr located) genarg_type =
Genarg.make0 None "intropattern"
let wit_tactic : (raw_tactic_expr, glob_tactic_expr, glob_tactic_expr) genarg_type =