X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=Mate%2FNativeSizes.hs;h=5e8795b46f158967db8d2e8ee72bdadbee7da25c;hb=dc7082de1fff3158da5682d683502128b5f6cc0b;hp=0ba612842eb7233522a5d8321f002ecd4fa5dd52;hpb=38a8a9fe4d12f701fb7631208389666bcd568fa9;p=mate.git diff --git a/Mate/NativeSizes.hs b/Mate/NativeSizes.hs index 0ba6128..5e8795b 100644 --- a/Mate/NativeSizes.hs +++ b/Mate/NativeSizes.hs @@ -8,5 +8,10 @@ ptrSize, longSize :: NativeWord ptrSize = 4 longSize = 8 +type NativeWord = Word32 +#else +-- HACK, for ghc-mod ... +ptrSize = undefined +longSize = undefined type NativeWord = Word32 #endif