From: simonmar <unknown>
Date: Mon, 20 Nov 2000 11:15:41 +0000 (+0000)
Subject: [project @ 2000-11-20 11:15:41 by simonmar]
X-Git-Tag: Approximately_9120_patches~3313
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=ae0004b26003431180edb214f2f6175022ab8bf4;p=ghc-hetmet.git

[project @ 2000-11-20 11:15:41 by simonmar]
remove #warn
---

diff --git a/ghc/rts/Evaluator.c b/ghc/rts/Evaluator.c
index 03a1548..0ae503e 100644
--- a/ghc/rts/Evaluator.c
+++ b/ghc/rts/Evaluator.c
@@ -5,8 +5,8 @@
  * Copyright (c) 1994-2000.
  *
  * $RCSfile: Evaluator.c,v $
- * $Revision: 1.59 $
- * $Date: 2000/11/07 13:30:41 $
+ * $Revision: 1.60 $
+ * $Date: 2000/11/20 11:15:41 $
  * ---------------------------------------------------------------------------*/
 
 #include "Rts.h"
@@ -1561,7 +1561,6 @@ StgThreadReturnCode enter( Capability* cap, StgClosure* obj0 )
             }
             obj = ap->fun;
 #ifdef EAGER_BLACKHOLING
-#warn  LAZY_BLACKHOLING is default for StgHugs
 #error Dont know if EAGER_BLACKHOLING works in StgHugs
             {
             /* superfluous - but makes debugging easier */
@@ -1878,7 +1877,6 @@ static inline void PopUpdateFrame ( StgClosure* obj )
              fprintf(stderr,"gSp = %p\tgSu = %p\n\n", gSp, gSu);
              );
 #ifdef EAGER_BLACKHOLING
-#warn  LAZY_BLACKHOLING is default for StgHugs
 #error Dont know if EAGER_BLACKHOLING works in StgHugs
     ASSERT(get_itbl(gSu->updatee)->type == BLACKHOLE
            || get_itbl(gSu->updatee)->type == SE_BLACKHOLE