From fc82074a9076d650610d71a966d8714f5217257f Mon Sep 17 00:00:00 2001 From: Ben Gamari <ben@smart-cactus.org> Date: Sun, 26 Mar 2017 19:06:04 -0400 Subject: [PATCH] T229: Fix name of WORD_SIZE macro --- tests/T229.hs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/tests/T229.hs b/tests/T229.hs index 9f4fd885..17148493 100644 --- a/tests/T229.hs +++ b/tests/T229.hs @@ -1,5 +1,7 @@ {-# LANGUAGE CPP #-} +#include "MachDeps.h" + import Data.Array.MArray import Data.Array.IO import Data.Word @@ -7,7 +9,7 @@ import Data.Word main :: IO () main = do -- This should fail due to integer overflow -#if WORD_SIZE == 8 +#if WORD_SIZE_IN_BITS == 64 m <- newArray_ (0,2^62-1) :: IO (IOUArray Int Word32) -- allocates 0 bytes readArray m 17 >>= print -- Read some random location in address space #else -- GitLab