From: Simon Marlow <marlowsd@gmail.com>
Date: Tue, 30 Mar 2010 13:44:37 +0000 (+0000)
Subject: fix a non-portable printf format
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=07308413a4b20e70c294b657006327b09b65cfc0

fix a non-portable printf format
---

diff --git a/rts/RtsUtils.c b/rts/RtsUtils.c
index 51c1250..9021909 100644
--- a/rts/RtsUtils.c
+++ b/rts/RtsUtils.c
@@ -138,8 +138,8 @@ static void addAllocation(void *addr, size_t len) {
         /* This doesn't actually help as we haven't looked at the flags
          * at the time that it matters (while running constructors) */
         IF_DEBUG(sanity,
-                 debugBelch("Ignoring allocation %p %zd as allocs is NULL\n",
-                            addr, len);)
+                 debugBelch("Ignoring allocation %p %d as allocs is NULL\n",
+                            addr, (int)len);)
     }
 }