X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Finterpreter%2Fcodegen.c;h=c356c1b152319aa28c6758a1bb4e9596b8e83dd7;hb=fa2efd1ea7fe23ccb8a1b029e3a8c9047b462045;hp=83985cd91b67e880fcf5693946551b7291526892;hpb=f6af472e5394338ca7f663263f189b7336f918cb;p=ghc-hetmet.git

diff --git a/ghc/interpreter/codegen.c b/ghc/interpreter/codegen.c
index 83985cd..c356c1b 100644
--- a/ghc/interpreter/codegen.c
+++ b/ghc/interpreter/codegen.c
@@ -9,8 +9,8 @@
  * included in the distribution.
  *
  * $RCSfile: codegen.c,v $
- * $Revision: 1.24 $
- * $Date: 2000/05/10 09:00:20 $
+ * $Revision: 1.25 $
+ * $Date: 2000/05/10 16:53:35 $
  * ------------------------------------------------------------------------*/
 
 #include "hugsbasictypes.h"
@@ -842,11 +842,10 @@ Void cgModule ( Module mod )
 Void codegen(what)
 Int what; {
     switch (what) {
-       case PREPREL:
-       case RESET: 
-       case MARK: 
-       case POSTPREL:
-          break;
+       case PREPREL:  break;
+       case RESET:    break;
+       case MARK:     break;
+       case POSTPREL: break;
     }
     liftControl(what);
 }