tls 0.9.4 → 0.9.5

raw patch · 2 files changed

+5/−2 lines, 2 files

Files

Network/TLS/State.hs +4/−1
tls.cabal +1/−1

Network/TLS/State.hs view

@@ -1,4 +1,4 @@-{-# LANGUAGE GeneralizedNewtypeDeriving, FlexibleContexts, MultiParamTypeClasses, ExistentialQuantification, RankNTypes #-}+{-# LANGUAGE GeneralizedNewtypeDeriving, FlexibleContexts, MultiParamTypeClasses, ExistentialQuantification, RankNTypes, CPP #-} -- | -- Module      : Network.TLS.State -- License     : BSD-style@@ -125,6 +125,9 @@ instance MonadState TLSState TLSSt where 	put x = TLSSt (lift $ put x) 	get   = TLSSt (lift get)+#if MIN_VERSION_mtl(2,1,0)+	state f = TLSSt (lift $ state f)+#endif  runTLSState :: TLSSt a -> TLSState -> (Either TLSError a, TLSState) runTLSState f st = runState (runErrorT (runTLSSt f)) st

tls.cabal view

@@ -1,5 +1,5 @@ Name:                tls-Version:             0.9.4+Version:             0.9.5 Description:    Native Haskell TLS and SSL protocol implementation for server and client.    .