-----------------------------------------------------------------------------
--- $Id: DriverMkDepend.hs,v 1.12 2001/06/14 12:50:06 simonpj Exp $
+-- $Id: DriverMkDepend.hs,v 1.13 2001/06/26 16:30:50 rrt Exp $
--
-- GHC Driver
--
Nothing -> return ()
Just hdl -> do
- -- slurp the rest of the orignal makefile and copy it into the output
+ -- slurp the rest of the original makefile and copy it into the output
let slurp = do
l <- hGetLine hdl
hPutStrLn tmp_hdl l
dir_contents <- readIORef v_Dep_dir_contents
ignore_dirs <- readIORef v_Dep_ignore_dirs
excl_mods <- readIORef v_Dep_exclude_mods
- hisuf <- readIORef v_Hi_suf
+ hisuf <- readIORef v_Hi_suf
let
imp_mod = moduleNameUserString imp
-----------------------------------------------------------------------------
--- $Id: DriverPipeline.hs,v 1.81 2001/06/25 01:35:07 sof Exp $
+-- $Id: DriverPipeline.hs,v 1.82 2001/06/26 16:30:50 rrt Exp $
--
-- GHC Driver
--
++ md_c_flags
++ [ "-x", "c", input_fn, "-o", output_fn ])
- -- ToDo: switch away from using 'echo' alltogether (but need
+ -- ToDo: switch away from using 'echo' altogether (but need
-- a faster alternative than what's done below).
#if defined(mingw32_TARGET_OS) && defined(MINIMAL_UNIX_DEPS)
else (do