X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Data%2FWord.hs;h=3a0a795292eb028ad184a66f750b675c22dba628;hb=d20f3c9e058e81146ba3d346c4319b63ae6858f1;hp=630855628b0fda02abc9dea8622919c46713d4d4;hpb=4aa4c78edf3cf4607ddeb669f536d646395ae9f0;p=haskell-directory.git diff --git a/Data/Word.hs b/Data/Word.hs index 6308556..3a0a795 100644 --- a/Data/Word.hs +++ b/Data/Word.hs @@ -29,6 +29,16 @@ module Data.Word import GHC.Word #endif +#ifdef __HUGS__ +import Hugs.Word +#endif + +#ifdef __NHC__ +import NHC.FFI (Word8, Word16, Word32, Word64) +import NHC.SizedTypes (Word8, Word16, Word32, Word64) -- instances of Bits +type Word = Word32 +#endif + {- $notes * All arithmetic is performed modulo 2^n, where n is the number of