Repository : ssh://darcs.haskell.org//srv/darcs/ghc

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/b1eee04d53a59b8cb834b56b58c8830a5b298db4

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

commit b1eee04d53a59b8cb834b56b58c8830a5b298db4
Author: Ian Lynagh <[email protected]>
Date:   Thu Apr 26 20:24:06 2012 +0100

    Build fixes

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

 ghc/hschooks.c       |    2 +-
 includes/rts/Types.h |    2 ++
 2 files changed, 3 insertions(+), 1 deletions(-)

diff --git a/ghc/hschooks.c b/ghc/hschooks.c
index ab689fd..2572bab 100644
--- a/ghc/hschooks.c
+++ b/ghc/hschooks.c
@@ -34,6 +34,6 @@ defaultsHook (void)
 void
 StackOverflowHook (lnat stack_size)    /* in bytes */
 {
-    fprintf(stderr, "GHC stack-space overflow: current limit is %" FMT_SizeT " 
bytes.\nUse the `-K<size>' option to increase it.\n", stack_size);
+    fprintf(stderr, "GHC stack-space overflow: current limit is %zu 
bytes.\nUse the `-K<size>' option to increase it.\n", stack_size);
 }
 
diff --git a/includes/rts/Types.h b/includes/rts/Types.h
index 1f08f46..ff42cda 100644
--- a/includes/rts/Types.h
+++ b/includes/rts/Types.h
@@ -14,6 +14,8 @@
 #ifndef RTS_TYPES_H
 #define RTS_TYPES_H
 
+#include <stddef.h>
+
 typedef unsigned int    nat;           /* at least 32 bits (like int) */
 typedef          size_t lnat;          /* at least 32 bits            */
 



_______________________________________________
Cvs-ghc mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to