summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEdward Z. Yang <ezyang@mit.edu>2013-10-11 17:01:00 -0700
committerEdward Z. Yang <ezyang@mit.edu>2013-10-11 20:02:37 -0700
commit9fb30cbcbc02086c5c6eb3942acdfdcad8331cb9 (patch)
treede008746f7e562e32e37f4820199f653fdd337ee
parent6c122f9c8850df6b6869af17cf7420e7da5c3270 (diff)
downloadhaskell-9fb30cbcbc02086c5c6eb3942acdfdcad8331cb9.tar.gz
Do not copy stack after stack overflow, fixes #8435
Signed-off-by: Edward Z. Yang <ezyang@mit.edu>
-rw-r--r--rts/Threads.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/rts/Threads.c b/rts/Threads.c
index 1c4500084c..8ee8d4f09a 100644
--- a/rts/Threads.c
+++ b/rts/Threads.c
@@ -536,6 +536,7 @@ threadStackOverflow (Capability *cap, StgTSO *tso)
} else {
// Send this thread the StackOverflow exception
throwToSingleThreaded(cap, tso, (StgClosure *)stackOverflow_closure);
+ return;
}
}