[project @ 1997-05-26 05:48:07 by sof]
[ghc-hetmet.git] / ghc / compiler / tests / simplCore / simpl001.hs
index 79e00ec..c481365 100644 (file)
@@ -3,6 +3,7 @@
 -- only tickled by the simplifier
 
 -- type Foo a b = a -> (b -> a) -> b
+module Test where
 
 (++++) :: (a -> (b -> a) -> b) -> (a -> (b -> a) -> b) -> a -> (b -> a) -> b
 x ++++ y = y