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

{-# LANGUAGE DuplicateRecordFields #-}

{-# WARNING foo "No warnings for DRFs" #-}
data S = MkS { foo :: Bool }
data T = MkT { foo :: Int }