Revert "globalmaphack: use old school CPP"
[mate.git] / Mate / NativeSizes.hs
index b6d9286a61aebf219bc06130197e9de478ca0997..0ba612842eb7233522a5d8321f002ecd4fa5dd52 100644 (file)
@@ -1,9 +1,12 @@
+{-# LANGUAGE CPP #-}
 module Mate.NativeSizes where
 
 import Data.Word
 
-ptrSize, longSize :: Word32
-#ifdef i386_HOST_ARCH
+ptrSize, longSize :: NativeWord
+#if defined(ARCH_X86)
 ptrSize = 4
 longSize = 8
+
+type NativeWord = Word32
 #endif