ngx-export 0.9.1.1 → 0.9.1.2
raw patch · 2 files changed
+7/−7 lines, 2 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- NgxExport.hs +6/−6
- ngx-export.cabal +1/−1
NgxExport.hs view
@@ -458,15 +458,15 @@ asyncIOFlag8b :: B.ByteString asyncIOFlag8b = L.toStrict $ runPut $ putInt64host 1 -asyncIOCommon :: IO C8L.ByteString ->+asyncIOCommon :: IO (C8L.ByteString, Bool) -> CInt -> Bool -> Ptr (Ptr NgxStrType) -> Ptr CInt -> Ptr CUInt -> Ptr (StablePtr L.ByteString) -> IO (StablePtr (Async ())) asyncIOCommon a (I fd) efd p pl pr spd = async (do (s, (r, exiting)) <- safeYYHandler $ do- s <- a- fmap (flip (,) (0, False)) $ return $! s+ (s, exiting) <- a+ fmap (flip (,) (0, exiting)) $ return $! s pokeLazyByteString s p pl spd poke pr r if exiting@@ -509,10 +509,10 @@ ] else return False if exiting- then return C8L.empty+ then return (C8L.empty, True) else do x' <- B.unsafePackCStringLen (x, n)- f x' fstRun+ flip (,) False <$> f x' fstRun ) fd efd asyncIOYYY :: IOYYY -> Ptr NgxStrType -> CInt -> CString -> CInt ->@@ -523,7 +523,7 @@ (do b' <- peekNgxStringArrayLenY b m x' <- B.unsafePackCStringLen (x, n)- f b' x'+ flip (,) False <$> f b' x' ) fd efd bS :: BS -> CString -> CInt ->
ngx-export.cabal view
@@ -1,5 +1,5 @@ name: ngx-export-version: 0.9.1.1+version: 0.9.1.2 synopsis: Helper module for Nginx haskell module description: Helper module for <http://github.com/lyokha/nginx-haskell-module Nginx haskell module>