Commit 32f585b6 authored by Ian Lynagh's avatar Ian Lynagh
Browse files

Fix Makefile generatin on Windows

parent c9b6b5e8
...@@ -22,7 +22,7 @@ module DriverMkDepend ( ...@@ -22,7 +22,7 @@ module DriverMkDepend (
import qualified GHC import qualified GHC
import GHC ( Session, ModSummary(..) ) import GHC ( Session, ModSummary(..) )
import DynFlags import DynFlags
import Util ( escapeSpaces ) import Util
import HscTypes ( HscEnv, IsBootInterface, msObjFilePath, msHsFilePath ) import HscTypes ( HscEnv, IsBootInterface, msObjFilePath, msHsFilePath )
import SysTools ( newTempName ) import SysTools ( newTempName )
import qualified SysTools import qualified SysTools
...@@ -248,10 +248,10 @@ findDependency hsc_env src imp is_boot include_pkg_deps ...@@ -248,10 +248,10 @@ findDependency hsc_env src imp is_boot include_pkg_deps
----------------------------- -----------------------------
writeDependency :: Handle -> [FilePath] -> FilePath -> IO () writeDependency :: Handle -> [FilePath] -> FilePath -> IO ()
-- (writeDependency h [t1,t2] dep) writes to handle h the dependency -- (writeDependency h [t1,t2] dep) writes to handle h the dependency
-- t1 t2 : dep -- t1 t2 : dep
writeDependency hdl targets dep writeDependency hdl targets dep
= hPutStrLn hdl (unwords (map escapeSpaces targets) ++ " : " = hPutStrLn hdl (unwords (map forOutput targets) ++ " : " ++ forOutput dep)
++ escapeSpaces dep) where forOutput = escapeSpaces . reslash Forwards . normalise
----------------------------- -----------------------------
insertSuffixes insertSuffixes
......
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