path: root/testsuite/tests/overloadedrecflds/should_fail/overloadedrecfldsfail07.hs

-- Test type errors contain field names, not selector names

{-# LANGUAGE DuplicateRecordFields #-}

data T = MkT { x :: Int }

y = x x

main = return ()