diff options
author | Simon Marlow <marlowsd@gmail.com> | 2010-03-30 13:44:37 +0000 |
---|---|---|
committer | Simon Marlow <marlowsd@gmail.com> | 2010-03-30 13:44:37 +0000 |
commit | 07308413a4b20e70c294b657006327b09b65cfc0 (patch) | |
tree | 5076dced8a9d934fe4d9ce011dd49d557e4ce829 /rts/RtsUtils.c | |
parent | 9f56cd65c4f8d57d7cde847681a7b72632c3f7fe (diff) | |
download | haskell-07308413a4b20e70c294b657006327b09b65cfc0.tar.gz |
fix a non-portable printf format
Diffstat (limited to 'rts/RtsUtils.c')
-rw-r--r-- | rts/RtsUtils.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/RtsUtils.c b/rts/RtsUtils.c index 51c1250682..9021909dfa 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);) } } |