diff options
| author | Edward Z. Yang <ezyang@mit.edu> | 2013-10-10 18:37:32 -0700 |
|---|---|---|
| committer | Edward Z. Yang <ezyang@mit.edu> | 2013-10-11 16:50:02 -0700 |
| commit | c6af06ef38813c460eaa0dec613eae98f4a57796 (patch) | |
| tree | 6906746de38a0d01079b1e6edada96b4cf9b558b /rts/RaiseAsync.h | |
| parent | 400c260f977f5cd2bf2f2f26deeeecbe37466295 (diff) | |
| download | haskell-c6af06ef38813c460eaa0dec613eae98f4a57796.tar.gz | |
If exceptions are blocked, add stack overflow to blocked exceptions list. Fixes #8303.
Signed-off-by: Edward Z. Yang <ezyang@mit.edu>
Diffstat (limited to 'rts/RaiseAsync.h')
| -rw-r--r-- | rts/RaiseAsync.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/rts/RaiseAsync.h b/rts/RaiseAsync.h index d804f6bc64..1f61b8c72d 100644 --- a/rts/RaiseAsync.h +++ b/rts/RaiseAsync.h @@ -16,6 +16,9 @@ #include "BeginPrivate.h" +void blockedThrowTo (Capability *cap, + StgTSO *target, MessageThrowTo *msg); + void throwToSingleThreaded (Capability *cap, StgTSO *tso, StgClosure *exception); |