diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 1999-12-01 22:58:03 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 1999-12-01 22:58:03 +0000 |
| commit | 1177cdf4ce24cb6c3c546b5d56c28a5a4df699e7 (patch) | |
| tree | 3e4df02278ee223e54d80c8fbb89addbdf2f1028 /pretyping | |
| parent | 7627d092c7dfbf7261d5a19c1f7e0b2170b9ad5e (diff) | |
Renommage de multcase en cases
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@182 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'pretyping')
| -rw-r--r-- | pretyping/cases.mli | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/pretyping/cases.mli b/pretyping/cases.mli new file mode 100644 index 000000000..c0997c044 --- /dev/null +++ b/pretyping/cases.mli @@ -0,0 +1,20 @@ + +(* $Id$ *) + +(*i*) +open Names +open Term +open Evd +open Environ +open Rawterm +open Evarutil +(*i*) + +(* Compilation of pattern-matching. *) + +val compile_multcase : + (trad_constraint -> env -> rawconstr -> unsafe_judgment) + * 'a evar_defs -> trad_constraint -> env -> + rawconstr option * rawconstr list * + (identifier list * pattern list * rawconstr) list -> + unsafe_judgment |