git.iko.soy/text
on master help sign in
Tidy up imports
a1b1986Bryan O'Sullivan
Data/Text/Encoding.hs+6−8
compare with master
unifiedsplit
@@ -64,18 +64,12 @@ module Data.Text.Encoding
64#endif
64#endif
65 ) where
65 ) where
66
66
67−import Control.Exception (evaluate, try)
68−
69#if __GLASGOW_HASKELL__ >= 702
67#if __GLASGOW_HASKELL__ >= 702
70import Control.Monad.ST.Unsafe (unsafeIOToST, unsafeSTToIO)
68import Control.Monad.ST.Unsafe (unsafeIOToST, unsafeSTToIO)
71#else
69#else
72import Control.Monad.ST (unsafeIOToST, unsafeSTToIO)
70import Control.Monad.ST (unsafeIOToST, unsafeSTToIO)
73#endif
71#endif
74
72
75−import Control.Monad.ST (runST)
76−import Data.ByteString as B
77−import Data.ByteString.Internal as B hiding (c2w)
78−
79#if MIN_VERSION_bytestring(0,10,4)
73#if MIN_VERSION_bytestring(0,10,4)
80import Data.Bits ((.&.))
74import Data.Bits ((.&.))
81import Data.Text.Internal.Unsafe.Char (ord)
75import Data.Text.Internal.Unsafe.Char (ord)
@@ -87,12 +81,17 @@ import qualified Data.ByteString.Builder.Prim.Internal as BP
87import qualified Data.Text.Internal.Encoding.Utf16 as U16
81import qualified Data.Text.Internal.Encoding.Utf16 as U16
88#endif
82#endif
89
83
84+import Control.Exception (evaluate, try)
85+import Control.Monad.ST (runST)
86+import Data.ByteString as B
87+import Data.ByteString.Internal as B hiding (c2w)
90import Data.Text ()
88import Data.Text ()
91import Data.Text.Encoding.Error (OnDecodeError, UnicodeException, strictDecode)
89import Data.Text.Encoding.Error (OnDecodeError, UnicodeException, strictDecode)
92import Data.Text.Internal (Text(..), safe, textP)
90import Data.Text.Internal (Text(..), safe, textP)
93−import Data.Text.Internal.Unsafe.Shift (shiftR)
94import Data.Text.Internal.Private (runText)
91import Data.Text.Internal.Private (runText)
95import Data.Text.Internal.Unsafe.Char (unsafeWrite)
92import Data.Text.Internal.Unsafe.Char (unsafeWrite)
93+import Data.Text.Internal.Unsafe.Shift (shiftR)
94+import Data.Text.Unsafe (unsafeDupablePerformIO)
96import Data.Word (Word8, Word32)
95import Data.Word (Word8, Word32)
97import Foreign.C.Types (CSize(..))
96import Foreign.C.Types (CSize(..))
98import Foreign.ForeignPtr (withForeignPtr)
97import Foreign.ForeignPtr (withForeignPtr)
@@ -103,7 +102,6 @@ import GHC.Base (ByteArray#, MutableByteArray#)
103import qualified Data.Text.Array as A
102import qualified Data.Text.Array as A
104import qualified Data.Text.Internal.Encoding.Fusion as E
103import qualified Data.Text.Internal.Encoding.Fusion as E
105import qualified Data.Text.Internal.Fusion as F
104import qualified Data.Text.Internal.Fusion as F
106−import Data.Text.Unsafe (unsafeDupablePerformIO)
107
105
108#include "text_cbits.h"
106#include "text_cbits.h"
109
107