summaryrefslogtreecommitdiff
path: root/testsuite/tests/rename/should_fail/T19843g.hs
blob: 22db3381f3f689ad5c43f8f540f09ee678e0fc17 (plain)
1
2
3
4
5
6
7
8
9
10
{-# LANGUAGE NoFieldSelectors #-}

module T19843g where

import Prelude (Int, map)

data A = A {mop :: ()}
data Mup = Mup

foo = foo {mup = 1}