[project @ 1997-05-26 05:48:07 by sof]

[ghc-hetmet.git] / ghc / compiler / tests / stranal / fact.lhs

diff --git a/ghc/compiler/tests/stranal/fact.lhs b/ghc/compiler/tests/stranal/fact.lhs
index 2507c6b..20b2256 100644 (file)
--- a/ghc/compiler/tests/stranal/fact.lhs
+++ b/ghc/compiler/tests/stranal/fact.lhs
@@ -1,2 +1,3 @@
+> module Test where
 > fact :: Int -> Int
 > fact n = if n==0 then 2 else (fact n) * n