X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FSchedule.c;h=96c52f53501ce828863b6e0289f6951ecd69e861;hb=890f5a1a6e70ff4021cd58463f5152f10c47b395;hp=c6fb1d885e61cb23bcf8b7b986fcc993eaf8cd6a;hpb=0ba8b0bed96c78570bc750e0413d555b6939c16c;p=ghc-hetmet.git

diff --git a/rts/Schedule.c b/rts/Schedule.c
index c6fb1d8..96c52f5 100644
--- a/rts/Schedule.c
+++ b/rts/Schedule.c
@@ -1479,9 +1479,7 @@ schedulePostRunThread (StgTSO *t)
             throwToSingleThreaded_(&capabilities[0], t, 
                                    NULL, rtsTrue, NULL);
             
-#ifdef REG_R1
             ASSERT(get_itbl((StgClosure *)t->sp)->type == ATOMICALLY_FRAME);
-#endif
         }
     }