X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Finterpreter%2Ftype.c;h=12c0458d784ea12cd6c39158b74f293c88903661;hb=391358678567341041284d0062ea606552460a14;hp=9c625e9e3ace238a7e68ea984619faa50603b2eb;hpb=7c0ef81a9f1d5fa157e1f5fbc333a29793680796;p=ghc-hetmet.git

diff --git a/ghc/interpreter/type.c b/ghc/interpreter/type.c
index 9c625e9..12c0458 100644
--- a/ghc/interpreter/type.c
+++ b/ghc/interpreter/type.c
@@ -9,8 +9,8 @@
  * included in the distribution.
  *
  * $RCSfile: type.c,v $
- * $Revision: 1.17 $
- * $Date: 1999/11/29 18:59:34 $
+ * $Revision: 1.18 $
+ * $Date: 1999/12/06 16:25:28 $
  * ------------------------------------------------------------------------*/
 
 #include "prelude.h"
@@ -2765,7 +2765,7 @@ Void typeChecker(what)
 Int what; {
     switch (what) {
         case RESET   : tcMode       = EXPRESSION;
-+ 		       daSccs	    = NIL;
+ 		       daSccs	    = NIL;
                        preds        = NIL;
                        pendingBtyvs = NIL;
                        daSccs       = NIL;