From: Ian Lynagh <igloo@earth.li>
Date: Sun, 20 Jun 2010 00:04:59 +0000 (+0000)
Subject: Remove some old commented out code
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=606452f9c07defe1f3603a35f867fb4597a5dfb5

Remove some old commented out code
---

diff --git a/rts/Printer.c b/rts/Printer.c
index b55f105..565a11e 100644
--- a/rts/Printer.c
+++ b/rts/Printer.c
@@ -289,10 +289,6 @@ printClosure( StgClosure *obj )
         {
             StgWord i;
             debugBelch("ARR_WORDS(\"");
-            /* ToDo: we can't safely assume that this is a string! 
-            for (i = 0; arrWordsGetChar(obj,i); ++i) {
-                putchar(arrWordsGetChar(obj,i));
-		} */
 	    for (i=0; i<arr_words_words((StgArrWords *)obj); i++)
 	      debugBelch("%lu", (lnat)((StgArrWords *)obj)->payload[i]);
             debugBelch("\")\n");