@@ -74,8 +74,15 @@ import Foreign.ForeignPtr.Unsafe (unsafeForeignPtrToPtr)
74import Foreign.Ptr (minusPtr, plusPtr, Ptr, castPtr)
74import Foreign.Ptr (minusPtr, plusPtr, Ptr, castPtr)
75import Foreign.Storable (Storable(..))
75import Foreign.Storable (Storable(..))
76import GHC.ForeignPtr (mallocPlainForeignPtrBytes)
76import GHC.ForeignPtr (mallocPlainForeignPtrBytes)
78+ (withFdSocket, Socket, PortNumber, SocketOption(..), Family(..),
79+ SockAddr(..), withSocketsDo, SocketType(..), socket, accept, bind,
80+ defaultProtocol, setSocketOption, maxListenQueue, sendBuf, recvBuf)
77import Prelude hiding (read)
81import Prelude hiding (read)
83+import qualified Network.Socket as Net
85+import Streamly (MonadAsync)
79import Streamly.Mem.Array.Types (Array(..))
86import Streamly.Mem.Array.Types (Array(..))
80import Streamly.Streams.Serial (SerialT)
87import Streamly.Streams.Serial (SerialT)
81import Streamly.Streams.StreamK.Type (IsStream, mkStream)
88import Streamly.Streams.StreamK.Type (IsStream, mkStream)
@@ -86,10 +93,6 @@ import qualified Streamly.Mem.Array as A
86import qualified Streamly.Mem.Array.Types as A hiding (flattenArrays)
93import qualified Streamly.Mem.Array.Types as A hiding (flattenArrays)
87import qualified Streamly.Prelude as S
94import qualified Streamly.Prelude as S
89−import Network.Socket hiding (listen)
90−import qualified Network.Socket as Net
91−import Streamly (MonadAsync)
93-------------------------------------------------------------------------------
96-------------------------------------------------------------------------------
95-------------------------------------------------------------------------------
98-------------------------------------------------------------------------------