[ghc-hetmet.git] / ghc / tests / reader / should_compile / read010.hs

module ShouldSucceed where

--!!! Infix record constructor.

data Rec = (:<-:) { a :: Int, b :: Float }