diff options
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 |