Commit 4117eb40 authored by simonmar's avatar simonmar
Browse files

[project @ 2000-10-05 13:25:03 by simonmar]

oops, need to touch the .o file if compilation was NOT required
parent e9109f65
{-# OPTIONS -W -fno-warn-incomplete-patterns #-}
-----------------------------------------------------------------------------
-- $Id: Main.hs,v 1.62 2000/10/03 16:51:57 sewardj Exp $
-- $Id: Main.hs,v 1.63 2000/10/05 13:25:03 simonmar Exp $
--
-- GHC Driver program
--
......@@ -1821,7 +1821,9 @@ run_phase Hsc basename suff input_fn output_fn
-- check whether compilation was performed, bail out if not
b <- doesFileExist output_fn
if not b && not (null source_unchanged) -- sanity
then return False
then do run_something "Touching object file"
("touch " ++ output_fn)
return False
else do -- carry on...
-- Generate -Rghc-timing info
......
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