summaryrefslogtreecommitdiff
path: root/rts/RaiseAsync.c
diff options
context:
space:
mode:
Diffstat (limited to 'rts/RaiseAsync.c')
-rw-r--r--rts/RaiseAsync.c3
1 files changed, 3 insertions, 0 deletions
diff --git a/rts/RaiseAsync.c b/rts/RaiseAsync.c
index 1a57e47466..e65cea3bfd 100644
--- a/rts/RaiseAsync.c
+++ b/rts/RaiseAsync.c
@@ -558,6 +558,9 @@ maybePerformBlockedException (Capability *cap, StgTSO *tso)
return 0;
}
+// awakenBlockedExceptionQueue(): Just wake up the whole queue of
+// blocked exceptions and let them try again.
+
void
awakenBlockedExceptionQueue (Capability *cap, StgTSO *tso)
{