From: simonmar <unknown>
Date: Wed, 30 Mar 2005 11:07:48 +0000 (+0000)
Subject: [project @ 2005-03-30 11:07:48 by simonmar]
X-Git-Tag: Initial_conversion_from_CVS_complete~851
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=9ebc66ac951dd30dd2325553abbb4be9086bceef;p=ghc-hetmet.git

[project @ 2005-03-30 11:07:48 by simonmar]
reverse rev 1.4: nat should be unsigned int, not unsigned long.  I'm
doing this (a) to fix some printf type errors, and (b) to see what
breaks.
---

diff --git a/ghc/includes/RtsTypes.h b/ghc/includes/RtsTypes.h
index 1a29ea8..9e8c7b8 100644
--- a/ghc/includes/RtsTypes.h
+++ b/ghc/includes/RtsTypes.h
@@ -1,5 +1,5 @@
 /*
-  Time-stamp: <2004-11-08 12:17:01 simonmar>
+  Time-stamp: <2005-03-30 12:02:33 simonmar>
 
   RTS specific types.
 */
@@ -11,11 +11,7 @@
 #ifndef RTS_TYPES_H
 #define RTS_TYPES_H
 
-#if SIZEOF_VOID_P == 8
-typedef unsigned long nat;           /* at least 32 bits (like int) */
-#else
 typedef unsigned int  nat;           /* at least 32 bits (like int) */
-#endif
 typedef unsigned long lnat;          /* at least 32 bits            */
 #ifndef _MSC_VER
 typedef unsigned long long ullong;   /* at least 32 bits            */