From a52e4629a4e9a90fb612967c4e1f6f86429a0df3 Mon Sep 17 00:00:00 2001 From: "simonmar@microsoft.com" Date: Tue, 18 Dec 2007 14:51:35 +0000 Subject: [PATCH] use "MB" rather than "Mb" for abbreviating megabytes --- rts/Stats.c | 2 +- rts/hooks/OutOfHeap.c | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/rts/Stats.c b/rts/Stats.c index b9df019..fcca405 100644 --- a/rts/Stats.c +++ b/rts/Stats.c @@ -546,7 +546,7 @@ stat_exit(int alloc) TICK_TO_DBL(GC_coll_etimes[g])); } - statsPrintf("\n%11ld Mb total memory in use\n\n", + statsPrintf("\n%11ld MB total memory in use\n\n", mblocks_allocated * MBLOCK_SIZE / (1024 * 1024)); #if defined(THREADED_RTS) diff --git a/rts/hooks/OutOfHeap.c b/rts/hooks/OutOfHeap.c index 98db0d7..e998237 100644 --- a/rts/hooks/OutOfHeap.c +++ b/rts/hooks/OutOfHeap.c @@ -13,7 +13,7 @@ OutOfHeapHook (lnat request_size, lnat heap_size) /* both sizes in bytes */ /* fprintf(stderr, "Heap exhausted;\nwhile trying to allocate %lu bytes in a %lu-byte heap;\nuse `+RTS -H' to increase the total heap size.\n", */ (void)request_size; /* keep gcc -Wall happy */ - fprintf(stderr, "Heap exhausted;\nCurrent maximum heap size is %lu bytes (%lu Mb);\nuse `+RTS -M' to increase it.\n", + fprintf(stderr, "Heap exhausted;\nCurrent maximum heap size is %lu bytes (%lu MB);\nuse `+RTS -M' to increase it.\n", heap_size, heap_size / (1024*1024)); } -- 1.7.10.4