@@ -9,7 +9,7 @@ import Control.Exception(assert)
99import Control.Monad(liftM2)
1010import Control.Monad.ST(runST,ST)
1111import Data.Array.Base
12−import Data.Bits
12+import Data.Bits (shiftL, shiftR, (.&.))
1313import qualified Data.ByteString as B
1414import qualified Data.ByteString.Unsafe as B
1515import Data.ByteString.Internal(ByteString(..),mallocByteString,memcpy)