X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=Foreign%2FStorable.hs;h=cfe0524d42f4e0660485bf64b2718cd3fe8303b6;hb=b73537367458c1307177d60d44b85516b661bd99;hp=3ee78d041ee5b24990ddccbbc0094c9b09b6303e;hpb=40001ff06f1058c5b375f8b6c6c3dfd0471600ba;p=ghc-base.git diff --git a/Foreign/Storable.hs b/Foreign/Storable.hs index 3ee78d0..cfe0524 100644 --- a/Foreign/Storable.hs +++ b/Foreign/Storable.hs @@ -1,4 +1,4 @@ -{-# OPTIONS -fno-implicit-prelude #-} +{-# OPTIONS_GHC -fno-implicit-prelude #-} ----------------------------------------------------------------------------- -- | -- Module : Foreign.Storable @@ -199,7 +199,7 @@ STORABLE(Char,SIZEOF_HSCHAR,ALIGNMENT_HSCHAR, STORABLE(Int,SIZEOF_HSINT,ALIGNMENT_HSINT, readIntOffPtr,writeIntOffPtr) -#ifdef __GLASGOW_HASKELL__ +#ifndef __NHC__ STORABLE(Word,SIZEOF_HSWORD,ALIGNMENT_HSWORD, readWordOffPtr,writeWordOffPtr) #endif