on master help sign in
Fixed build failure (missing withSocketsDo import on non-windows platforms)
commitb829a9eb824166437837fe0c13359c9be2e9d44a authorAnton Dessiatov <anton.dessiatov@gmail.com> dateMon 28 Apr 2014, 10:59 (12 years ago) parentf71f0c3
1 file changed+1−2
warp/Network/Wai/Handler/Warp/Run.hs+1−2
warp/Network/Wai/Handler/Warp/Run.hs+1−2
@@ -23,7 +23,7 @@ import Data.Conduit.Network (bindPort)
2323#define bindPortTCP bindPort
2424#endif
2525import Network (sClose, Socket)
26−import Network.Socket (accept, SockAddr)
26+import Network.Socket (accept, withSocketsDo, SockAddr)
2727import qualified Network.Socket.ByteString as Sock
2828import Network.Wai
2929import qualified Network.Wai.Handler.Warp.Date as D
@@ -41,7 +41,6 @@ import Data.IORef (IORef, newIORef, readIORef, writeIORef)
4141
4242#if WINDOWS
4343import qualified Control.Concurrent.MVar as MV
44−import Network.Socket (withSocketsDo)
4544import Control.Concurrent (forkIO)
4645#else
4746import System.Posix.IO (FdOption(CloseOnExec), setFdOption)