@@ -45,19 +45,14 @@ import qualified Data.Coerce as Coerce
4545import qualified Data.List as List
4646import qualified Data.String as Chars
4747import qualified Data.Utf8 as Utf8
48−import Foreign.Ptr (plusPtr, minusPtr)
4948import GHC.Exts
50− ( Int(I#), Ptr(Ptr)
51− , RealWorld
49+ ( Int(I#), Ptr
5250 , MutableByteArray#
5351 , isTrue#
5452 , newByteArray#
5553 , sizeofByteArray#
56− , writeWord8OffAddr#
57− , copyByteArrayToAddr#
5854 , unsafeFreezeByteArray#
5955 )
60−import GHC.IO
6156import GHC.ST (ST(ST), runST)
6257import GHC.Prim
6358import GHC.Word (Word8(W8#))