From 506416a6c5444a3aaa4e12ad0027dda31103d0b5 Mon Sep 17 00:00:00 2001
From: simonm <unknown>
Date: Wed, 3 Mar 1999 17:22:11 +0000
Subject: [PATCH] [project @ 1999-03-03 17:22:11 by simonm] Nat --> Word

---
 ghc/rts/GC.c |    8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/ghc/rts/GC.c b/ghc/rts/GC.c
index 64108c9..9fbd0ca 100644
--- a/ghc/rts/GC.c
+++ b/ghc/rts/GC.c
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: GC.c,v 1.45 1999/02/26 17:46:08 simonm Exp $
+ * $Id: GC.c,v 1.46 1999/03/03 17:22:11 simonm Exp $
  *
  * (c) The GHC Team 1998-1999
  *
@@ -1224,11 +1224,11 @@ loop:
       case CONSTR_0_2:
       case CONSTR_STATIC:
 	{ 
-	  StgNat32 offset = info->layout.selector_offset;
+	  StgWord32 offset = info->layout.selector_offset;
 
 	  /* check that the size is in range */
 	  ASSERT(offset < 
-		 (StgNat32)(selectee_info->layout.payload.ptrs + 
+		 (StgWord32)(selectee_info->layout.payload.ptrs + 
 		            selectee_info->layout.payload.nptrs));
 
 	  /* perform the selection! */
@@ -2225,7 +2225,7 @@ scavenge_stack(StgPtr p, StgPtr stack_end)
 {
   StgPtr q;
   const StgInfoTable* info;
-  StgNat32 bitmap;
+  StgWord32 bitmap;
 
   /* 
    * Each time around this loop, we are looking at a chunk of stack
-- 
1.7.10.4