summaryrefslogtreecommitdiff
path: root/includes
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2009-11-19 14:01:43 +0000
committerSimon Marlow <marlowsd@gmail.com>2009-11-19 14:01:43 +0000
commitaf18880ffe8a4d7c4ee449d353319adb530a782c (patch)
tree77978681b6f7ec88c64e24c1d93278fe3851ecb9 /includes
parent831e2ed684863c5e0203c9b32f8ceaca42493e95 (diff)
downloadhaskell-af18880ffe8a4d7c4ee449d353319adb530a782c.tar.gz
define HS_WORD_MAX
Diffstat (limited to 'includes')
-rw-r--r--includes/HsFFI.h2
1 files changed, 2 insertions, 0 deletions
diff --git a/includes/HsFFI.h b/includes/HsFFI.h
index f489be5623..dceabab86f 100644
--- a/includes/HsFFI.h
+++ b/includes/HsFFI.h
@@ -100,9 +100,11 @@ typedef void* HsStablePtr;
#if SIZEOF_VOID_P == 8
#define HS_INT_MIN __INT64_MIN
#define HS_INT_MAX __INT64_MAX
+#define HS_WORD_MAX __UINT64_MAX
#elif SIZEOF_VOID_P == 4
#define HS_INT_MIN __INT32_MIN
#define HS_INT_MAX __INT32_MAX
+#define HS_WORD_MAX __UINT32_MAX
#else
#error GHC untested on this architecture: sizeof(void *) != 4 or 8
#endif