Repository : ssh://g...@git.haskell.org/ghc
On branch : master
Link :
http://ghc.haskell.org/trac/ghc/changeset/9fb30cbcbc02086c5c6eb3942acdfdcad8331cb9/ghc
>---------------------------------------------------------------
commit 9fb30cbcbc02086c5c6eb3942acdfdcad8331cb9
Author: Edward Z. Yang <ezy...@mit.edu>
Date: Fri Oct 11 17:01:00 2013 -0700
Do not copy stack after stack overflow, fixes #8435
Signed-off-by: Edward Z. Yang <ezy...@mit.edu>
>---------------------------------------------------------------
9fb30cbcbc02086c5c6eb3942acdfdcad8331cb9
rts/Threads.c | 1 +
1 file changed, 1 insertion(+)
diff --git a/rts/Threads.c b/rts/Threads.c
index 1c45000..8ee8d4f 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;
}
}
_______________________________________________
ghc-commits mailing list
ghc-commits@haskell.org
http://www.haskell.org/mailman/listinfo/ghc-commits
