gsasl 0.3.5 → 0.3.6

raw patch · 2 files changed

+18/−9 lines, 2 filesdep ~base

Dependency ranges changed: base

Files

• gsasl.cabal +8/−8
• lib/Network/Protocol/SASL/GNU.hs +10/−1

@@ -1,9 +1,9 @@ name: gsasl-version: 0.3.5+version: 0.3.6 license: GPL-3 license-file: license.txt-author: John Millikin <jmillikin@gmail.com>-maintainer: John Millikin <jmillikin@gmail.com>+author: John Millikin <john@john-millikin.com>+maintainer: John Millikin <john@john-millikin.com> build-type: Simple cabal-version: >= 1.6 category: Network@@ -15,13 +15,13 @@ description:  source-repository head-  type: bazaar-  location: https://john-millikin.com/branches/haskell-gsasl/0.3/+  type: git+  location: https://john-millikin.com/code/haskell-gsasl/  source-repository this-  type: bazaar-  location: https://john-millikin.com/branches/haskell-gsasl/0.3/-  tag: haskell-gsasl_0.3.5+  type: git+  location: https://john-millikin.com/code/haskell-gsasl/+  tag: haskell-gsasl_0.3.6  library   ghc-options: -Wall -O2

@@ -77,8 +77,9 @@ -- Imports {{{  import           Prelude hiding (catch)+import           Control.Applicative (Applicative, pure, (<*>)) import qualified Control.Exception as E-import           Control.Monad (when, unless)+import           Control.Monad (ap, when, unless) import           Control.Monad.IO.Class (MonadIO, liftIO) import qualified Control.Monad.Trans.Reader as R import qualified Data.ByteString as B@@ -142,6 +143,10 @@ instance Functor SASL where 	fmap f = SASL . fmap f . unSASL +instance Applicative SASL where+        pure = SASL . pure+        (<*>) = ap+ instance Monad SASL where 	return = SASL . return 	(>>=) sasl f = SASL $ unSASL sasl >>= unSASL . f@@ -248,6 +253,10 @@  instance Functor Session where 	fmap f = Session . fmap f . unSession++instance Applicative Session where+        pure = Session . pure+        (<*>) = ap  instance Monad Session where 	return = Session . return