summaryrefslogtreecommitdiff
path: root/testsuite/tests/rename/should_fail/T19843f.hs
blob: 64beb233fa7326e3e49c3ad39838ba0be9dc9b26 (plain)
1
2
3
4
5
6
7
8
9
10
module T19843f where

import Prelude (Int, map)

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

foo = foo {mup = 1}

bar = A {mup = 1}