[commit: ghc] wip/erikd/rts: fixup (1e18f88)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/erikd/rts
Link       : http://ghc.haskell.org/trac/ghc/changeset/1e18f886068608c68e5545feedcdc7777947931d/ghc

>---------------------------------------------------------------

commit 1e18f886068608c68e5545feedcdc7777947931d
Author: Erik de Castro Lopo <erikd at mega-nerd.com>
Date:   Fri Oct 21 06:28:53 2016 +1100

    fixup


>---------------------------------------------------------------

1e18f886068608c68e5545feedcdc7777947931d
 ghc/hschooks.c | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/ghc/hschooks.c b/ghc/hschooks.c
index 7e1ef91..7ebbcc3 100644
--- a/ghc/hschooks.c
+++ b/ghc/hschooks.c
@@ -48,7 +48,9 @@ defaultsHook (void)
 void
 StackOverflowHook (StgWord stack_size)    /* in bytes */
 {
-    fprintf(stderr, "GHC stack-space overflow: current limit is %zu bytes.\nUse the `-K<size>' option to increase it.\n", (size_t)stack_size);
+    fprintf(stderr, "GHC stack-space overflow: current limit is %" FMT_Word
+        " bytes.\nUse the `-K<size>' option to increase it.\n",
+        (StgWord) stack_size);
 }
 
 int main (int argc, char *argv[])