diff options
author | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2005-12-26 17:08:16 +0000 |
---|---|---|
committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2005-12-26 17:08:16 +0000 |
commit | 099fb1b4c5084bb899e4910e42c971cdfa81e1aa (patch) | |
tree | 33aa85efc447dd483613243a65ce5a31763d8d5e /interp | |
parent | 989718e36ca338a64c248723d2590bb3eb4854a5 (diff) |
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
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 1b2f48f95..2646a4c82 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 50c8ab3e0..d61245475 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 |