import Prelude
import Data.Ix ( Ix, range, index, rangeSize )
-import Data.Bits
import Data.Int
import Data.Word
import Foreign.Ptr
import Foreign.StablePtr
-import Foreign.Storable
#ifdef __GLASGOW_HASKELL__
import GHC.Arr ( STArray, unsafeIndex )
#endif
#ifdef __HUGS__
+import Data.Bits
+import Foreign.Storable
import qualified Hugs.Array as Arr
import qualified Hugs.ST as ArrST
import Hugs.Array ( unsafeIndex )
import Hugs.ByteArray
#endif
-import Data.Dynamic
+import Data.Typeable
#include "Typeable.h"
#include "MachDeps.h"