X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FFrontPanel.c;h=2ce91e2c6511d0eda98d34df0edddff7d734bdc5;hb=e50364a5a8e5d736445cd8e5b10a813ec0a5a2e0;hp=579b75bab3c261b0b885ad7209377a96136a5895;hpb=0065d5ab628975892cea1ec7303f968c3338cbe1;p=ghc-hetmet.git

diff --git a/rts/FrontPanel.c b/rts/FrontPanel.c
index 579b75b..2ce91e2 100644
--- a/rts/FrontPanel.c
+++ b/rts/FrontPanel.c
@@ -15,7 +15,6 @@
 #include "RtsUtils.h"
 #include "MBlock.h"
 #include "FrontPanel.h"
-#include "Storage.h"
 #include "Stats.h"
 #include "RtsFlags.h"
 #include "Schedule.h"
@@ -665,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);