aboutsummaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/bug_4612.v
blob: ce95f26acce9e90b7dbcac28045295940b799fdb (plain)
1
2
3
4
5
6
7
(* While waiting for support, check at least that it does not raise an anomaly *)

Inductive ctype :=
| Struct: list ctype -> ctype
| Bot : ctype.

Fail Scheme Equality for ctype.