@@ -40,12 +40,11 @@ module Data.Text.Array
40#if defined(__GLASGOW_HASKELL__)
40#if defined(__GLASGOW_HASKELL__)
41#include "MachDeps.h"
41#include "MachDeps.h"
43−import GHC.Base (ByteArray#, MutableByteArray#, indexWord16Array#,
43+import GHC.Base (ByteArray#, MutableByteArray#, Int(..), indexWord16Array#,
44 newByteArray#, readWord16Array#, unsafeCoerce#,
44 newByteArray#, readWord16Array#, unsafeCoerce#,
45 writeWord16Array#, (+#), (*#))
45 writeWord16Array#, (+#), (*#))
46import GHC.Prim (Int#)
46import GHC.Prim (Int#)
47import GHC.ST (ST(..), runST)
47import GHC.ST (ST(..), runST)
48−import GHC.Types (Int(..))
49import GHC.Word (Word16(..))
48import GHC.Word (Word16(..))
51#elif defined(__HUGS__)
50#elif defined(__HUGS__)