X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fmain%2FDriverMkDepend.hs;h=a97101b2d60b987c9a2325249c81d76dbddcc4b7;hb=8102af4eac807ae4956a79b27f03fd890f8294c6;hp=74ee4dcd1fd841c2ef8f46279b4b2b99bf66e088;hpb=a896a832ab7306da8c638df7f44619b3548bd518;p=ghc-hetmet.git diff --git a/compiler/main/DriverMkDepend.hs b/compiler/main/DriverMkDepend.hs index 74ee4dc..a97101b 100644 --- a/compiler/main/DriverMkDepend.hs +++ b/compiler/main/DriverMkDepend.hs @@ -1,3 +1,10 @@ +{-# OPTIONS -w #-} +-- The above warning supression flag is a temporary kludge. +-- While working on this module you are encouraged to remove it and fix +-- any warnings in the module. See +-- http://hackage.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings +-- for details + ----------------------------------------------------------------------------- -- -- Makefile Dependency Generation @@ -29,9 +36,6 @@ import SrcLoc import Data.List import CmdLineParser -#if __GLASGOW_HASKELL__ <= 408 -import Panic ( catchJust, ioErrors ) -#endif import ErrUtils ( debugTraceMsg, putMsg ) import Data.IORef ( IORef, readIORef, writeIORef ) @@ -398,7 +402,11 @@ dep_opts = [ ( "s", SepArg (consIORef v_Dep_suffixes) ) , ( "f", SepArg (writeIORef v_Dep_makefile) ) , ( "w", NoArg (writeIORef v_Dep_warnings False) ) + , ( "-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 + , ( "-include-pkg-deps", NoArg (writeIORef v_Dep_include_pkg_deps True) ) , ( "-exclude-module=", Prefix (consIORef v_Dep_exclude_mods . mkModuleName) ) , ( "x", Prefix (consIORef v_Dep_exclude_mods . mkModuleName) )