From edb58a77c7d4aa4c17e3114fe7ac733df5e745ab Mon Sep 17 00:00:00 2001
From: Simon Marlow <simonmar@microsoft.com>
Date: Wed, 13 Jun 2007 09:51:44 +0000
Subject: [PATCH] warning police

---
 rts/Printer.c |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rts/Printer.c b/rts/Printer.c
index 28cdd0d..7364edd 100644
--- a/rts/Printer.c
+++ b/rts/Printer.c
@@ -1157,7 +1157,7 @@ void prettyPrintClosure_ (StgClosure *obj)
         case CONSTR_STATIC:
         case CONSTR_NOCAF_STATIC: 
         {
-           int i; 
+           nat i; 
            char *descriptor;
 
            /* find the con_info for the constructor */
-- 
1.7.10.4