Change the generated file to be in module Test
[packages/filepath.git] / Generate.hs
index 52efebd..48e88c6 100755 (executable)
@@ -22,9 +22,11 @@ main = do
     writeFileBinary "tests/Test.hs" (prefix ++ genTests tests)
 
 prefix = unlines
-    ["import AutoTest"
+    ["module Test(main) where"
+    ,"import AutoTest"
     ,"import qualified System.FilePath.Windows as W"
     ,"import qualified System.FilePath.Posix as P"
+    ,"main :: IO ()"
     ,"main = do"
     ]