diff options
Diffstat (limited to 'pretyping/cases.mli')
| -rw-r--r-- | pretyping/cases.mli | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/pretyping/cases.mli b/pretyping/cases.mli index 011c7fcbe3..9f121b1222 100644 --- a/pretyping/cases.mli +++ b/pretyping/cases.mli @@ -10,6 +10,11 @@ open Rawterm open Evarutil (*i*) +(* Used for old cases in pretyping *) + +val branch_scheme : + env -> 'a evar_defs -> bool -> int -> inductive * constr list -> constr + (* Compilation of pattern-matching. *) val compile_multcase : |