From: simonmar@microsoft.com <unknown>
Date: Tue, 18 Dec 2007 14:51:35 +0000 (+0000)
Subject: use "MB" rather than "Mb" for abbreviating megabytes
X-Git-Tag: Before_cabalised-GHC~268
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=a52e4629a4e9a90fb612967c4e1f6f86429a0df3;p=ghc-hetmet.git

use "MB" rather than "Mb" for abbreviating megabytes
---

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<size>' 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<size>' to increase it.\n",
+  fprintf(stderr, "Heap exhausted;\nCurrent maximum heap size is %lu bytes (%lu MB);\nuse `+RTS -M<size>' to increase it.\n",
 	  heap_size, heap_size / (1024*1024));
 }