Update Trac ticket URLs to point to GitLab
[ghc.git] / testsuite / tests / typecheck / should_compile / T2735.hs
1 -- #2735
2
3 module Bug where
4
5 data S = S { s1 :: (), s2 :: () }
6
7 f s = s { s1 = (), s2 = s1 s }