From: panne Date: Sun, 20 Jun 2004 17:58:49 +0000 (+0000) Subject: [project @ 2004-06-20 17:58:46 by panne] X-Git-Tag: Initial_conversion_from_CVS_complete~1799 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=b6fbea9780c7acaa623acf2289db1514745ab6b8;p=ghc-hetmet.git [project @ 2004-06-20 17:58:46 by panne] Renamed Opt_WarnMisc to Opt_WarnDodgyImports --- diff --git a/ghc/compiler/main/CmdLineOpts.lhs b/ghc/compiler/main/CmdLineOpts.lhs index a230e8d..b68d236 100644 --- a/ghc/compiler/main/CmdLineOpts.lhs +++ b/ghc/compiler/main/CmdLineOpts.lhs @@ -266,7 +266,7 @@ data DynFlag | Opt_WarnUnusedImports | Opt_WarnUnusedMatches | Opt_WarnDeprecations - | Opt_WarnMisc + | Opt_WarnDodgyImports -- language opts | Opt_AllowOverlappingInstances @@ -675,7 +675,7 @@ minusWOpts Opt_WarnUnusedMatches, Opt_WarnUnusedImports, Opt_WarnIncompletePatterns, - Opt_WarnMisc + Opt_WarnDodgyImports ] minusWallOpts diff --git a/ghc/compiler/rename/RnNames.lhs b/ghc/compiler/rename/RnNames.lhs index f3fe011..baa7c74 100644 --- a/ghc/compiler/rename/RnNames.lhs +++ b/ghc/compiler/rename/RnNames.lhs @@ -474,7 +474,7 @@ filterImports iface imp_spec (Just (want_hiding, import_items)) total_avails Just avail@(AvailTC _ [n]) -> -- This occurs when you import T(..), but -- only export T abstractly. The single [n] -- in the AvailTC is the type or class itself - ifOptM Opt_WarnMisc (addWarn (dodgyImportWarn tc)) `thenM_` + ifOptM Opt_WarnDodgyImports (addWarn (dodgyImportWarn tc)) `thenM_` succeed_with False avail Just avail -> succeed_with False avail