From 099fb1b4c5084bb899e4910e42c971cdfa81e1aa Mon Sep 17 00:00:00 2001 From: herbelin Date: Mon, 26 Dec 2005 17:08:16 +0000 Subject: Petite correction nom QuantHypArgType suite suppression traducteur git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@7739 85f007b7-540e-0410-9357-904b9bb8a0f7 --- interp/genarg.ml | 8 ++++---- interp/genarg.mli | 4 ++-- 2 files changed, 6 insertions(+), 6 deletions(-) (limited to 'interp') 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 -- cgit v1.2.3