network-run 0.2.3 → 0.2.4

raw patch · 2 files changed

+4/−2 lines, 2 files

Files

Network/Run/Core.hs +3/−1
network-run.cabal +1/−1

Network/Run/Core.hs view

@@ -1,5 +1,5 @@-{-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE CPP #-}+{-# LANGUAGE OverloadedStrings #-}  module Network.Run.Core (     resolve@@ -19,8 +19,10 @@       , addrFlags = if passive then [AI_PASSIVE] else []       } +#if !MIN_VERSION_network(3,1,2) openSocket :: AddrInfo -> IO Socket openSocket addr = socket (addrFamily addr) (addrSocketType addr) (addrProtocol addr)+#endif  openServerSocket :: AddrInfo -> IO Socket openServerSocket addr = E.bracketOnError (openSocket addr) close $ \sock -> do

network-run.cabal view

@@ -1,5 +1,5 @@ name:                network-run-version:             0.2.3+version:             0.2.4 synopsis:            Simple network runner library description:         Simple functions to run network clients and servers. -- bug-reports: