X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2Fmain%2FCmdLineParser.hs;h=e34b8c08575b6c82f4c3370d03efd5fdd401c4f0;hb=1187e57fab2b5904a808ac973e5d04b91f880920;hp=d8807fea3a9b8af80e9c9ea6e853e791d0240791;hpb=d5b3e9b5f30ccdd34a964f109c03c56ff71dee2e;p=ghc-hetmet.git

diff --git a/ghc/compiler/main/CmdLineParser.hs b/ghc/compiler/main/CmdLineParser.hs
index d8807fe..e34b8c0 100644
--- a/ghc/compiler/main/CmdLineParser.hs
+++ b/ghc/compiler/main/CmdLineParser.hs
@@ -16,8 +16,10 @@ module CmdLineParser (
 
 #include "HsVersions.h"
 
-import Util		( maybePrefixMatch, notNull, removeSpaces )
--- import Panic
+import Util	( maybePrefixMatch, notNull, removeSpaces )
+#ifdef DEBUG
+import Panic	( assertPanic )
+#endif
 
 data OptKind m
 	= NoArg (m ())  -- flag with no argument