haskell-src-exts-1.24.0: tests/examples/RecordInfixSelector.hs

data RecordWithInfixSelector = Cons { (<>) :: Int -> Int }

idRecord = Cons { (<>) = id }