diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-09-09 15:06:44 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-09-09 15:06:44 +0000 |
| commit | a580a7a07da8651887c6fb386bd9af55bbe673a2 (patch) | |
| tree | 4233682720571f3fa09fba77bb31e446dc6203e1 /pretyping/indrec.mli | |
| parent | 51cd60453da3f1fe136904404046098d9c4f1cc3 (diff) | |
Ajout construction If primitive dans constr_expr et rawconstr
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4336 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/indrec.mli')
| -rw-r--r-- | pretyping/indrec.mli | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/pretyping/indrec.mli b/pretyping/indrec.mli index 65fefb83f..38d07d1d9 100644 --- a/pretyping/indrec.mli +++ b/pretyping/indrec.mli @@ -42,7 +42,7 @@ val build_mutual_indrec : (* These are for old Case/Match typing *) val type_rec_branches : bool -> env -> evar_map -> inductive_type - -> unsafe_judgment -> constr -> constr array * constr + -> constr -> constr -> constr array * constr val make_rec_branch_arg : env -> evar_map -> int * ('b * constr) option array * int -> |