diff options
| author | herbelin | 1999-11-26 21:12:12 +0000 |
|---|---|---|
| committer | herbelin | 1999-11-26 21:12:12 +0000 |
| commit | 96ad76f4a2da61b0283bd10a7246d76eeb9aa70e (patch) | |
| tree | 7f9e01cfc221f4c9bc64c76b044012a166ac8959 /pretyping/multcase.mli | |
| parent | 82667b4dc6d4a34708c2b9a14a940e05ea9044f7 (diff) | |
Version initiale
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@153 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping/multcase.mli')
| -rw-r--r-- | pretyping/multcase.mli | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/pretyping/multcase.mli b/pretyping/multcase.mli index cab7a15d2f..7819915d95 100644 --- a/pretyping/multcase.mli +++ b/pretyping/multcase.mli @@ -1,2 +1,17 @@ (* $Id$ *) + +open Names +open Term +open Evd +open Environ +open Rawterm +open Evarutil + +(* used by trad.ml *) +val compile_multcase : + (trad_constraint -> unsafe_env -> rawconstr -> unsafe_judgment) + * 'a evar_defs -> trad_constraint -> unsafe_env -> + rawconstr option * rawconstr list * + (identifier list * pattern list * rawconstr) list -> + unsafe_judgment |