summaryrefslogtreecommitdiff
path: root/testsuite/tests/overloadedrecflds/should_fail/T17965.hs
blob: b723637f237cd706679628bb4366230a472de914 (plain)
1
2
3
4
{-# LANGUAGE DuplicateRecordFields #-}
main = return ()
newtype Record a = Record { f :: a -> a }
class C a where f :: a -> a