Commit 34b9c1cf authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Fix rn.prog006 on Windows

parent 2ddc5df4
......@@ -16,8 +16,9 @@ include $(TOP)/mk/
# using the supplied Cabal configuration.
$(TEST_HC) --make pwd -v0
$(TEST_HC) --make -package-name test-1.0 B.C -fforce-recomp -v0
sed "s@__IMPORT__@$(abspath .)@" < >pkg.conf
sed "s@__IMPORT__@`./pwd`@" < >pkg.conf
$(TEST_HC) -c -package-conf pkg.conf -package test -fforce-recomp A.hs -i
# The -i clears the search path, so A.hs will find B.C from package test
extra_clean(['A.hi', 'A.o', 'B/C.hi', 'B/C.o',
'Main.hi', 'Main.o', 'pkg.conf']),
'Main.hi', 'Main.o', 'pkg.conf',
'pwd', 'pwd.exe', 'pwd.exe.manifest',
'pwd.hi', 'pwd.o']),
['$MAKE -s --no-print-directory rn.prog006'])
module Main where
import System.Directory
import System.Environment
main :: IO ()
main = do d <- getCurrentDirectory
putStr $ concatMap f d
where f '\\' = "/"
f c = [c]
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment