) where
+#ifdef __NHC__
+import NHC.FFI (Storable(..))
+#else
+
import Control.Monad ( liftM )
#include "MachDeps.h"
import GHC.IOBase
import GHC.Base
#else
+import Data.Int
+import Data.Word
import Foreign.Ptr
+import Foreign.StablePtr
#endif
#ifdef __HUGS__
+import Hugs.Prelude
import Hugs.Storable
#endif
STORABLE(Int64,SIZEOF_INT64,ALIGNMENT_INT64,
readInt64OffPtr,writeInt64OffPtr)
+
+#endif