summaryrefslogtreecommitdiff
path: root/testsuite/tests/deSugar/should_compile/T5252Take2.hs
blob: 64e64aff2049fdb0f600d7c6dce00b859427c3ec (plain)
1
2
3
4
5
module T5252Take2 where
import qualified T5252Take2a as M

write_message :: M.WriteMessage -> IO Bool
write_message (M.WriteMessage _) = return True