diff options
| author | barras | 2002-04-02 07:58:21 +0000 |
|---|---|---|
| committer | barras | 2002-04-02 07:58:21 +0000 |
| commit | 07686164a1279de0eff608f87ffe283dd34c1637 (patch) | |
| tree | 16ce941d8fbada87a7c2b778edea31dec4c565fa /parsing | |
| parent | 425f5dc5df05a85ddd35dd54136a94eb7baeb1f2 (diff) | |
- modifs de la condition de garde pour mieux tenir compte des raisonnements
par l'absurde
- un open_constr est maintenant un terme accompagne du sigma dans lequel il
est typable (il manquait l'info concernant le contexte de typage des
nouvelles evars)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@2579 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/astterm.mli | 7 |
1 files changed, 3 insertions, 4 deletions
diff --git a/parsing/astterm.mli b/parsing/astterm.mli index 2f40f0b28d..6edb387bcb 100644 --- a/parsing/astterm.mli +++ b/parsing/astterm.mli @@ -33,10 +33,9 @@ val interp_sort : Coqast.t -> sorts val interp_elimination_sort : Coqast.t -> sorts_family val interp_openconstr : - evar_map -> env -> Coqast.t -> (existential * constr) list * constr + evar_map -> env -> Coqast.t -> evar_map * constr val interp_casted_openconstr : - evar_map -> env -> Coqast.t -> constr -> - (existential * constr) list * constr + evar_map -> env -> Coqast.t -> constr -> evar_map * constr (* [interp_type_with_implicits] extends [interp_type] by allowing implicits arguments in the ``rel'' part of [env]; the extra @@ -61,7 +60,7 @@ val interp_constr_gen : val interp_openconstr_gen : evar_map -> env -> (identifier * constr) list -> (int * constr) list -> Coqast.t -> constr option - -> (existential * constr) list * constr + -> evar_map * constr (*Interprets constr patterns according to a list of instantiations (variables)*) |