Move -fno-cse flags from Makefile into pragmas

[ghc-hetmet.git] / compiler / main / DriverMkDepend.hs

diff --git a/compiler/main/DriverMkDepend.hs b/compiler/main/DriverMkDepend.hs
index a0ce114..ffb89c1 100644 (file)
--- a/compiler/main/DriverMkDepend.hs
+++ b/compiler/main/DriverMkDepend.hs
@@ -1,3 +1,5 @@
+{-# OPTIONS -fno-cse #-}
+-- -fno-cse is needed for GLOBAL_VAR's to behave properly
 
 -----------------------------------------------------------------------------
 --
@@ -38,7 +40,7 @@ import System.Exit      ( ExitCode(..), exitWith )
 import System.Directory
 import System.FilePath
 import System.IO
-import SYSTEM_IO_ERROR  ( isEOFError )
+import System.IO.Error  ( isEOFError )
 import Control.Monad    ( when )
 import Data.Maybe       ( isJust )
 
@@ -398,14 +400,20 @@ depEndMarker   = "# DO NOT DELETE: End of Haskell dependencies"
 dep_opts :: [Flag IO]
 dep_opts =
    [ Flag "s"                 (SepArg (consIORef v_Dep_suffixes))
+          Supported
    , Flag "f"                 (SepArg (writeIORef v_Dep_makefile))
+          Supported
    , Flag "w"                 (NoArg (writeIORef v_Dep_warnings False))
+          Supported
 
    , Flag "-include-prelude"  (NoArg (writeIORef v_Dep_include_pkg_deps True))
-        -- -include-prelude is the old name for -include-pkg-deps, kept around
-        -- for backward compatibility, but undocumented
+          (Deprecated "Use --include-pkg-deps instead")
 
    , Flag "-include-pkg-deps" (NoArg (writeIORef v_Dep_include_pkg_deps True))
+          Supported
    , Flag "-exclude-module="  (Prefix (consIORef v_Dep_exclude_mods . mkModuleName))
+          Supported
    , Flag "x"                 (Prefix (consIORef v_Dep_exclude_mods . mkModuleName))
+          Supported
    ]
+