1 {- In 2.05 this one crashed with
3 Fail: "basicTypes/Id.lhs", line 990: incomplete pattern(s)
4 to match in function "dataConFieldLabels"
6 Reason: dsExpr (RecordCon ...) didn't extract
7 the constructor properly.
12 data Eq a => Foo a = Foo { x :: a }