[project @ 1999-01-23 18:05:12 by sof]
[ghc-hetmet.git] / ghc / tests / reader / should_compile / read010.hs
1 -- !!! Infix record constructor.
2 module ShouldSucceed where
3
4 data Rec = (:<-:) { a :: Int, b :: Float }