aboutsummaryrefslogtreecommitdiff
path: root/pretyping/cases.ml
blob: 6abd8d6acdc9cf556535beb868bf56b21c1a2f29 (plain)
1
2
3
4
5
(* $Id$ *)

let compile_multcase _ _ _ = failwith "compile_multcase: TODO"