[project @ 2003-07-22 16:18:06 by simonmar]
[ghc-hetmet.git] / ghc / tests / ghci / prog001 / D2.hs
1 module D where
2
3 data T = A Int | B Float deriving Eq
4
5 f x = x + 1