Add optional eager black-holing, with new flag -feager-blackholing

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

diff --git a/rts/FrontPanel.c b/rts/FrontPanel.c
index 5dfe87a..2ce91e2 100644 (file)
--- a/rts/FrontPanel.c
+++ b/rts/FrontPanel.c
@@ -664,8 +664,7 @@ residencyCensus( void )
                        break;
 
                    case CAF_BLACKHOLE:
-                   case SE_CAF_BLACKHOLE:
-                   case SE_BLACKHOLE:
+                   case EAGER_BLACKHOLE:
                    case BLACKHOLE:
 /*                 case BLACKHOLE_BQ: FIXME: case does not exist */
                        size = sizeW_fromITBL(info);