From 45c92e91085250724bfc350ae8e78cfe93515235 Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Fri, 26 Sep 2008 23:28:06 +0000 Subject: [PATCH] Fix #2411: missing case for CATCH_STM_FRAME in raiseAsync() --- rts/RaiseAsync.c | 1 + 1 file changed, 1 insertion(+) diff --git a/rts/RaiseAsync.c b/rts/RaiseAsync.c index d3400d7..d411c41 100644 --- a/rts/RaiseAsync.c +++ b/rts/RaiseAsync.c @@ -1017,6 +1017,7 @@ raiseAsync(Capability *cap, StgTSO *tso, StgClosure *exception, // Not stop_at_atomically... fall through and abort the // transaction. + case CATCH_STM_FRAME: case CATCH_RETRY_FRAME: // IF we find an ATOMICALLY_FRAME then we abort the // current transaction and propagate the exception. In -- 1.7.10.4