@@ -49,7 +49,7 @@ main = do
4949
5050 -- Auto-generate Makefile
5151 setCurrentDirectory outputDir
52− callProcess "../.cabal-sandbox/bin/pcc" []
52+ callProcess "pcc" []
5353
5454 let tests = filter (`notElem` skipped) passingTestCases
5555
@@ -62,6 +62,11 @@ main = do
6262 putStrLn $ "Compiling test " ++ inputFile ++ " ..."
6363 setCurrentDirectory outputDir
6464 copyFile (passingDir </> inputFile) (srcDir </> inputFile)
65+
66+ let testCaseDir = passingDir </> (takeWhile (/='.') inputFile)
67+ testCaseDirExists <- doesDirectoryExist testCaseDir
68+ when testCaseDirExists $ callProcess "cp" ["-R", testCaseDir, srcDir]
69+
6570 callProcess "make" ["clean"]
6671 callProcess "make" ["debug"]
6772 --
@@ -70,6 +75,7 @@ main = do
7075 callProcess ("output" </> "bin" </> "main") []
7176
7277 removeFile (srcDir </> inputFile)
78+ when testCaseDirExists $ callProcess "rm" ["-rf", srcDir </> (takeWhile (/='.') inputFile)]
7379
7480 -- TODO: support failing test cases
7581 --
@@ -92,12 +98,13 @@ repo = "git://github.com/pure11/"
9298packages :: [(String, String)]
9399-------------------------------------------------------------------------------
94100packages =
95− [ ("purescript-eff", "")
96− , ("purescript-prelude", "")
97− , ("purescript-assert", "")
98− , ("purescript-st", "")
99− , ("purescript-console", "")
100− , ("purescript-functions", "")
101+ [ ("purescript-eff", "pure11-0.9")
102+ , ("purescript-prelude", "pure11-0.9")
103+ , ("purescript-assert", "pure11-0.9")
104+ , ("purescript-st", "pure11-0.9")
105+ , ("purescript-console", "pure11-0.9")
106+ , ("purescript-functions", "pure11-0.9")
107+ , ("purescript-partial", "pure11-0.9")
101108 ]
102109
103110-------------------------------------------------------------------------------
@@ -116,5 +123,5 @@ fetchPackages = do
116123skipped :: [String]
117124-------------------------------------------------------------------------------
118125skipped =
119− [ "ExplicitImportReExport.purs" -- OK, test has no main (would pass otherwise)
126+ [ "NumberLiterals.purs" -- unreliable float comparison, test manually
120127 ]