diff options
author | Ben Gamari <bgamari.foss@gmail.com> | 2013-09-07 17:53:34 -0400 |
---|---|---|
committer | Austin Seipp <austin@well-typed.com> | 2013-10-25 09:14:29 -0500 |
commit | 7de07eb78c10217c87f0f6a4c12ef2927d044e00 (patch) | |
tree | 6306c7ac1e55216aaf24d431c745fcab318fbfb4 /includes/Rts.h | |
parent | 72f8b8d694362890a424f5fa21fef37cee921ecf (diff) | |
download | haskell-7de07eb78c10217c87f0f6a4c12ef2927d044e00.tar.gz |
rts: Print correct stack size on stack overflow
This requires that stackOverflow() in RtsUtils.c be passed a reference
to the current TSO. This requires a small change in libraries/base.
Diffstat (limited to 'includes/Rts.h')
-rw-r--r-- | includes/Rts.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/includes/Rts.h b/includes/Rts.h index 96dc6a5c30..aca6c49605 100644 --- a/includes/Rts.h +++ b/includes/Rts.h @@ -250,7 +250,7 @@ void getWin32ProgArgv(int *argc, wchar_t **argv[]); void setWin32ProgArgv(int argc, wchar_t *argv[]); #endif -void stackOverflow(void); +void stackOverflow(StgTSO* tso); void stg_exit(int n) GNU_ATTRIBUTE(__noreturn__); |