[commit: packages/array] master: T229: Fix name of WORD_SIZE macro (fc82074)
git at git.haskell.org
git at git.haskell.org
Sun Mar 26 23:29:08 UTC 2017
Repository : ssh://git@git.haskell.org/array
On branch : master
Link : http://git.haskell.org/packages/array.git/commitdiff/fc82074a9076d650610d71a966d8714f5217257f
>---------------------------------------------------------------
commit fc82074a9076d650610d71a966d8714f5217257f
Author: Ben Gamari <ben at smart-cactus.org>
Date: Sun Mar 26 19:06:04 2017 -0400
T229: Fix name of WORD_SIZE macro
>---------------------------------------------------------------
fc82074a9076d650610d71a966d8714f5217257f
tests/T229.hs | 4 +++-
1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/tests/T229.hs b/tests/T229.hs
index 9f4fd88..1714849 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
More information about the ghc-commits
mailing list