X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fmain%2FCmdLineParser.hs;h=3373143ed39e80f3a1403cad071c8f15473d044e;hb=0c45d82423fcff64b43b95ab4882b26e7de560bf;hp=d68e6f78e29de2eb8546e9aa422925850cdb7aee;hpb=17b297d97d327620ed6bfab942f8992b2446f1bf;p=ghc-hetmet.git diff --git a/compiler/main/CmdLineParser.hs b/compiler/main/CmdLineParser.hs index d68e6f7..3373143 100644 --- a/compiler/main/CmdLineParser.hs +++ b/compiler/main/CmdLineParser.hs @@ -9,11 +9,11 @@ -- ----------------------------------------------------------------------------- -{-# OPTIONS_GHC -w #-} +{-# 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/WorkingConventions#Warnings +-- http://hackage.haskell.org/trac/ghc/wiki/Commentary/CodingStyle#Warnings -- for details module CmdLineParser ( @@ -24,9 +24,7 @@ module CmdLineParser ( #include "HsVersions.h" import Util ( maybePrefixMatch, notNull, removeSpaces ) -#ifdef DEBUG -import Panic ( assertPanic ) -#endif +import Panic data OptKind m -- Suppose the flag is -f = NoArg (m ()) -- -f all by itself