From 7f148c3265edb930223f50c3702e33bc51f00bd1 Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Wed, 5 May 2010 11:47:46 +0000 Subject: [PATCH] add a MAYBE_GC() in killThread#, fixes throwto003(threaded2) looping --- rts/Exception.cmm | 2 ++ 1 file changed, 2 insertions(+) diff --git a/rts/Exception.cmm b/rts/Exception.cmm index 55c79ce..af84692 100644 --- a/rts/Exception.cmm +++ b/rts/Exception.cmm @@ -218,6 +218,8 @@ stg_killThreadzh /* Needs 3 words because throwToSingleThreaded uses some stack */ STK_CHK_GEN( WDS(3), R1_PTR & R2_PTR, stg_killThreadzh); + /* We call allocate in throwTo(), so better check for GC */ + MAYBE_GC(R1_PTR & R2_PTR, stg_killThreadzh); /* * We might have killed ourselves. In which case, better be *very* -- 1.7.10.4