summaryrefslogtreecommitdiff
path: root/test-suite/success/if.v
blob: 3f7638631a1734d7eeb99d38144df6794a1734b7 (plain)
1
2
3
4
5
(* The synthesis of the elimination predicate may fail if algebric *)
(* universes are not cautiously treated *)

Check (fun b : bool => if b then Type else nat).