18aecb091d34d70bb005fbce97da9975e34a0a18
[ghc-hetmet.git] / ghc / tests / typecheck / should_compile / tc064.hs
1 module ShouldSucceed where
2
3 data Boolean = FF | TT
4
5 idb :: Boolean -> Boolean
6 idb x = x      
7