From: Ian Lynagh <igloo@earth.li>
Date: Fri, 15 Jun 2007 18:23:37 +0000 (+0000)
Subject: Fix size mismatch errors in mkDerivedConstants.c
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=bcaf68a97ba26a7bf781f9734fe7982dbb6db66d

Fix size mismatch errors in mkDerivedConstants.c
---

diff --git a/includes/mkDerivedConstants.c b/includes/mkDerivedConstants.c
index 90f6a4c..f87db37 100644
--- a/includes/mkDerivedConstants.c
+++ b/includes/mkDerivedConstants.c
@@ -31,14 +31,14 @@
 
 #define str(a,b) #a "_" #b
 
-#define OFFSET(s_type, field) ((unsigned int)&(((s_type*)0)->field))
+#define OFFSET(s_type, field) ((size_t)&(((s_type*)0)->field))
 
 #if defined(GEN_HASKELL)
 #define def_offset(str, offset) \
-    printf("oFFSET_" str " = %d::Int\n", offset);
+    printf("oFFSET_" str " = %zd::Int\n", offset);
 #else
 #define def_offset(str, offset) \
-    printf("#define OFFSET_" str " %d\n", offset);
+    printf("#define OFFSET_" str " %zd\n", offset);
 #endif
 
 #if defined(GEN_HASKELL)