X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fmain%2FDriverMkDepend.hs;h=b24c14e6b3b01449db0e8b204f3988be4186e281;hb=2eb04ca0f8d0ec72b417cddc60672c696b4a3daa;hp=74ee4dcd1fd841c2ef8f46279b4b2b99bf66e088;hpb=a896a832ab7306da8c638df7f44619b3548bd518;p=ghc-hetmet.git diff --git a/compiler/main/DriverMkDepend.hs b/compiler/main/DriverMkDepend.hs index 74ee4dc..b24c14e 100644 --- a/compiler/main/DriverMkDepend.hs +++ b/compiler/main/DriverMkDepend.hs @@ -29,9 +29,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 +395,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) )