codegen debug flag (+RTS -Dc) was unused; remove it

[ghc-hetmet.git] / rts / RtsFlags.c

diff --git a/rts/RtsFlags.c b/rts/RtsFlags.c
index 6f6f2c5..78c8d2a 100644 (file)
--- a/rts/RtsFlags.c
+++ b/rts/RtsFlags.c
@@ -156,7 +156,6 @@ void initRtsFlagsDefaults(void)
 #ifdef DEBUG
     RtsFlags.DebugFlags.scheduler      = rtsFalse;
     RtsFlags.DebugFlags.interpreter    = rtsFalse;
-    RtsFlags.DebugFlags.codegen                = rtsFalse;
     RtsFlags.DebugFlags.weak           = rtsFalse;
     RtsFlags.DebugFlags.gccafs         = rtsFalse;
     RtsFlags.DebugFlags.gc             = rtsFalse;
@@ -400,7 +399,6 @@ usage_text[] = {
 #if defined(DEBUG)
 "  -Ds  DEBUG: scheduler",
 "  -Di  DEBUG: interpreter",
-"  -Dc  DEBUG: codegen",
 "  -Dw  DEBUG: weak",
 "  -DG  DEBUG: gccafs",
 "  -Dg  DEBUG: gc",
@@ -671,9 +669,6 @@ error = rtsTrue;
                      case 'i':
                          RtsFlags.DebugFlags.interpreter = rtsTrue;
                          break;
-                     case 'c':
-                         RtsFlags.DebugFlags.codegen = rtsTrue;
-                         break;
                      case 'w':
                          RtsFlags.DebugFlags.weak = rtsTrue;
                          break;