packages feed

network-fancy 0.2.3 → 0.2.4

raw patch · 4 files changed

+17/−7 lines, 4 filesPVP: major bump suggested

API removals or changes: PVP suggests a major version bump

API changes (from Hackage documentation)

- Network.Fancy: address :: ServerSpec -> Address
- Network.Fancy: closeConnection :: ServerSpec -> Bool
- Network.Fancy: instance Eq Address
- Network.Fancy: instance Ord Address
- Network.Fancy: instance Show Address
- Network.Fancy: instance Show SocketAddress
- Network.Fancy: instance StringLike ByteString
- Network.Fancy: instance StringLike String
- Network.Fancy: instance Typeable Address
- Network.Fancy: recvSize :: ServerSpec -> Int
- Network.Fancy: reverseAddress :: ServerSpec -> Reverse
- Network.Fancy: threading :: ServerSpec -> Threading
+ Network.Fancy: [address] :: ServerSpec -> Address
+ Network.Fancy: [closeConnection] :: ServerSpec -> Bool
+ Network.Fancy: [recvSize] :: ServerSpec -> Int
+ Network.Fancy: [reverseAddress] :: ServerSpec -> Reverse
+ Network.Fancy: [threading] :: ServerSpec -> Threading
+ Network.Fancy: instance GHC.Classes.Eq Network.Fancy.Address
+ Network.Fancy: instance GHC.Classes.Ord Network.Fancy.Address
+ Network.Fancy: instance GHC.Show.Show Network.Fancy.Address
+ Network.Fancy: instance GHC.Show.Show Network.Fancy.SocketAddress
+ Network.Fancy: instance Network.Fancy.StringLike Data.ByteString.Internal.ByteString
+ Network.Fancy: instance Network.Fancy.StringLike Data.ByteString.Lazy.Internal.ByteString
+ Network.Fancy: instance Network.Fancy.StringLike GHC.Base.String

Files

Network/Fancy.hsc view
@@ -233,19 +233,22 @@ try' :: IO a -> IO (Either SomeException a) try' = E.try -writeOp :: String -> CInt -> IO Int64 -> IO Int64+ssize64 :: (#type ssize_t) -> Int64+ssize64 = fromIntegral++writeOp :: String -> CInt -> IO (#type ssize_t) -> IO Int64 writeOp desc s op = loop     where fd = fromIntegral s-          loop = do res <- op+          loop = do res <- fmap ssize64 op                     if res /= -1 then return res else getErrno >>= eh           eh err | err == eINTR = loop                  | err == eWOULDBLOCK || err == eAGAIN = threadWaitWrite fd >> loop                  | True = throwNetworkException (Socket s) desc err -readOp :: String -> CInt -> IO Int64 -> IO Int64+readOp :: String -> CInt -> IO (#type ssize_t) -> IO Int64 readOp desc s op = loop     where fd = fromIntegral s-          loop = do res <- op+          loop = do res <- fmap ssize64 op                     if res /= -1 then return res else getErrno >>= eh           eh err | err == eINTR = loop                  | err == eWOULDBLOCK || err == eAGAIN = threadWaitRead fd >> loop
Network/Fancy/Error.hs view
@@ -24,9 +24,9 @@ import Control.Exception import Control.Monad import Data.Typeable-import Foreign+import Foreign(allocaArray, Ptr) import Foreign.C-import System.IO.Unsafe+import System.IO.Unsafe(unsafePerformIO)  import Network.Fancy.Internal
changelog.md view
@@ -1,5 +1,12 @@ # network-fancy changelog +## Master - not yet released to hackage++## Version 0.2.4 2016-03-02++- Fixes for ancient GHC, 32 bit platform woes, fix #8+- Fixes for ancient GHC, make imports stricter, fix #7+ ## Version 0.2.3 2015-06-20  - Fix OS X build
network-fancy.cabal view
@@ -1,5 +1,5 @@ name: network-fancy-version: 0.2.3+version: 0.2.4 cabal-version: >=1.8 build-type: Simple license: BSD3