X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fmain%2FCmdLineParser.hs;h=ac73e948228051b85b2416cd8fedd2eff70e29e4;hb=5943ce90c9c9d4319eec3cfe1fb3315f018e1c45;hp=2a92a32904853889ecfbb47dd880785bad54e1bc;hpb=89a8960b2a270973743a2dfe4dee9fb2b25e870a;p=ghc-hetmet.git

diff --git a/compiler/main/CmdLineParser.hs b/compiler/main/CmdLineParser.hs
index 2a92a32..ac73e94 100644
--- a/compiler/main/CmdLineParser.hs
+++ b/compiler/main/CmdLineParser.hs
@@ -33,7 +33,7 @@ data OptKind m		-- Suppose the flag is -f
 	| AnySuffix (String -> m ())    -- -f or -farg; pass entire "-farg" to fn
 	| PrefixPred    (String -> Bool) (String -> m ())
 	| AnySuffixPred (String -> Bool) (String -> m ())
-
+ 
 processArgs :: Monad m
 	    => [(String, OptKind m)]	-- cmdline parser spec
 	    -> [String]			-- args