diff options
Diffstat (limited to 'interp')
| -rw-r--r-- | interp/genarg.ml | 8 | ||||
| -rw-r--r-- | interp/genarg.mli | 4 |
2 files changed, 6 insertions, 6 deletions
diff --git a/interp/genarg.ml b/interp/genarg.ml index 1b2f48f95c..2646a4c825 100644 --- a/interp/genarg.ml +++ b/interp/genarg.ml @@ -32,7 +32,7 @@ type argument_type = | SortArgType | ConstrArgType | ConstrMayEvalArgType - | QuantVarArgType + | QuantHypArgType | TacticArgType of int | OpenConstrArgType of bool | ConstrWithBindingsArgType @@ -124,9 +124,9 @@ let rawwit_ref = RefArgType let globwit_ref = RefArgType let wit_ref = RefArgType -let rawwit_quant_hyp = QuantVarArgType -let globwit_quant_hyp = QuantVarArgType -let wit_quant_hyp = QuantVarArgType +let rawwit_quant_hyp = QuantHypArgType +let globwit_quant_hyp = QuantHypArgType +let wit_quant_hyp = QuantHypArgType let rawwit_sort = SortArgType let globwit_sort = SortArgType diff --git a/interp/genarg.mli b/interp/genarg.mli index 50c8ab3e0b..d61245475c 100644 --- a/interp/genarg.mli +++ b/interp/genarg.mli @@ -71,7 +71,7 @@ VarArgType identifier constr RefArgType reference global_reference ConstrArgType constr_expr constr ConstrMayEvalArgType constr_expr may_eval constr -QuantVarArgType quantified_hypothesis quantified_hypothesis +QuantHypArgType quantified_hypothesis quantified_hypothesis TacticArgType raw_tactic_expr tactic OpenConstrArgType constr_expr open_constr ConstrBindingsArgType constr_expr with_bindings constr with_bindings @@ -237,7 +237,7 @@ type argument_type = | SortArgType | ConstrArgType | ConstrMayEvalArgType - | QuantVarArgType + | QuantHypArgType | TacticArgType of int | OpenConstrArgType of bool | ConstrWithBindingsArgType |