1 2 3 4 5 6 7 8
module T4918a where class MyEnum a where myEnum :: [a] instance MyEnum () where myEnum = [()]