diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2012-09-15 08:09:56 +0100 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2012-09-15 08:09:56 +0100 |
| commit | cf02909e1fc10597c3291817ab905d426307405b (patch) | |
| tree | dea7dbee8ca23d57168ccedb1c5e2e92a2ef9b91 /rts/hooks/StackOverflow.c | |
| parent | 7d83fdea229b940ae198ddc5c179ac449defd2ef (diff) | |
| parent | c3f4c6fa3228102eaada6efde8049724461a3bb0 (diff) | |
| download | haskell-cf02909e1fc10597c3291817ab905d426307405b.tar.gz | |
Merge remote branch 'origin/master'
Diffstat (limited to 'rts/hooks/StackOverflow.c')
| -rw-r--r-- | rts/hooks/StackOverflow.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/hooks/StackOverflow.c b/rts/hooks/StackOverflow.c index fe8a059b7f..407293902d 100644 --- a/rts/hooks/StackOverflow.c +++ b/rts/hooks/StackOverflow.c @@ -10,8 +10,8 @@ #include <stdio.h> void -StackOverflowHook (lnat stack_size) /* in bytes */ +StackOverflowHook (W_ stack_size) /* in bytes */ { - fprintf(stderr, "Stack space overflow: current size %" FMT_SizeT " bytes.\nUse `+RTS -Ksize -RTS' to increase it.\n", stack_size); + fprintf(stderr, "Stack space overflow: current size %" FMT_Word " bytes.\nUse `+RTS -Ksize -RTS' to increase it.\n", stack_size); } |