diff --git a/Z/IO/FileSystem/FilePath.hsc b/Z/IO/FileSystem/FilePath.hsc index a852a73..1edf6a5 100644 --- a/Z/IO/FileSystem/FilePath.hsc +++ b/Z/IO/FileSystem/FilePath.hsc @@ -38,20 +38,22 @@ module Z.IO.FileSystem.FilePath ) where import Control.Monad hiding (join) -import Data.Word import Data.Bits -import qualified Data.List as List +import qualified Data.List as List +import Data.Word +import GHC.Exts import GHC.Generics +import Prelude hiding (concat) import qualified Z.Data.CBytes as CB -import Z.Data.CBytes (CBytes(CB), allocCBytesUnsafe, withCBytesUnsafe, withCBytesListUnsafe) +import Z.Data.CBytes (CBytes (CB), allocCBytesUnsafe, + withCBytesListUnsafe, withCBytesUnsafe) import Z.Data.JSON (JSON) import qualified Z.Data.Text as T -import qualified Z.Data.Vector.Base as V import qualified Z.Data.Vector as V +import qualified Z.Data.Vector.Base as V import Z.Foreign import Z.IO.Environment (getEnv') import Z.IO.Exception -import Prelude hiding (concat) #include "hs_cwalk.h" -- \ diff --git a/Z/IO/UV/FFI.hsc b/Z/IO/UV/FFI.hsc index 3ce7fb4..e896757 100644 --- a/Z/IO/UV/FFI.hsc +++ b/Z/IO/UV/FFI.hsc @@ -15,20 +15,21 @@ module Z.IO.UV.FFI where import Data.Bits import Data.Int +import Data.Primitive.Types (Prim) import Data.Word -import Data.Primitive.Types (Prim) import Foreign.C.String import Foreign.C.Types import Foreign.Ptr import Foreign.Storable +import GHC.Exts +import GHC.Generics +import System.Posix.Types (CSsize (..)) import Z.Data.Array.Unaligned -import Z.Data.Text.Print (Print(..)) -import Z.Data.JSON (JSON) -import Z.Data.CBytes as CBytes +import Z.Data.CBytes as CBytes +import Z.Data.JSON (JSON) +import Z.Data.Text.Print (Print (..)) import Z.Foreign -import Z.IO.Network.SocketAddr (SocketAddr) -import System.Posix.Types (CSsize (..)) -import GHC.Generics +import Z.IO.Network.SocketAddr (SocketAddr) #include "hs_uv.h" #if HAVE_UNISTD_H