diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2009-07-24 15:00:10 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2009-07-24 15:00:10 +0000 |
| commit | 52cacd61834e6f448b8904bfa52c4a5a402e8698 (patch) | |
| tree | f5919144f255de03454de49942fd57ee7bd4e41b /rts/RtsUtils.c | |
| parent | 0c6929858665ae0e9918fe0c6c71ce26fd4a4461 (diff) | |
| download | haskell-52cacd61834e6f448b8904bfa52c4a5a402e8698.tar.gz | |
add number of bytes to +RTS -DS leak reports
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 3091aa1f89..6906619439 100644 --- a/rts/RtsUtils.c +++ b/rts/RtsUtils.c @@ -110,8 +110,8 @@ shutdownAllocator(void) free(prev); if (a == NULL) return; IF_DEBUG(sanity, - debugBelch("Warning: %p still allocated at shutdown\n", - a->addr);) + debugBelch("Warning: %ld bytes at %p still allocated at shutdown\n", + a->len, a->addr);) prev = a; } } |