added -c flag in System.Plugins.Load.unify

2013-10-03 18:39:43 +00:00 · 2013-10-03 18:39:43 +00:00 · 8124e44234
commit 8124e44234
parent 08f4a08a08
1 changed files with 1 additions and 1 deletions
--- a/src/System/Plugins/Load.hs
+++ b/src/System/Plugins/Load.hs
@ -301,7 +301,7 @@ unify obj incs args ty sym = do

        hWrite hdl src

-        e <- build tmpf tmpf1 (i:is++args++["-fno-code","-ohi "++tmpf1])
+        e <- build tmpf tmpf1 (i:is++args++["-fno-code","-c","-ohi "++tmpf1])
        mapM_ removeFile [tmpf,tmpf1]
        return e