Some tidying up of type pretty-printing
[ghc.git] / testsuite / tests / typecheck / should_fail / T8570.hs
1 module T8570 where
2
3 import T8570a (Image(filepath), logo)
4 import T8570b (Field(Image))
5
6 foo = let Image {filepath = x} = logo in x
7