mtl 1.1.1.0 → 1.1.1.1

raw patch · 2 files changed

+6/−4 lines, 2 files

Files

• Control/Monad/Error.hs +5/−3
• mtl.cabal +1/−1

@@ -81,14 +81,16 @@  #if !(MIN_VERSION_base(4,2,1)) --- These instances are in base-4.3+-- These instances are in base-4.3, minus the fail definition and+-- the Error constraint -instance Monad (Either e) where+instance (Error e) => Monad (Either e) where     return        = Right     Left  l >>= _ = Left l     Right r >>= k = k r+    fail msg      = Left (strMsg msg) -instance MonadFix (Either e) where+instance (Error e) => MonadFix (Either e) where     mfix f = let         a = f $ case a of             Right r -> r

@@ -1,5 +1,5 @@ name:         mtl-version:      1.1.1.0+version:      1.1.1.1 license:      BSD3 license-file: LICENSE author:       Andy Gill