little-rio 0.2.2 → 1.0.0

raw patch · 2 files changed

+15/−11 lines, 2 filesdep +little-logger

Dependencies added: little-logger

Files

little-rio.cabal +13/−3
src/LittleRIO.hs +2/−8

little-rio.cabal view

@@ -1,13 +1,13 @@ cabal-version: 1.12 --- This file has been generated from package.yaml by hpack version 0.33.0.+-- This file has been generated from package.yaml by hpack version 0.34.4. -- -- see: https://github.com/sol/hpack ----- hash: 5ac2b5e5c9651242e6bae46a58a6674da57dbc16daeff53478cb3b2d8b383e0e+-- hash: 5cf4cd5486faeb568a52489ccbe6512d994a8f0594705ad1500650a242be642c  name:           little-rio-version:        0.2.2+version:        1.0.0 synopsis:       When you need just the RIO monad description:    Please see the README on GitHub at <https://github.com/ejconlon/little-rio#readme> category:       Control@@ -33,11 +33,21 @@       Paths_little_rio   hs-source-dirs:       src+  default-extensions:+      DeriveGeneric+      DeriveTraversable+      DerivingStrategies+      DerivingVia+      FlexibleInstances+      FunctionalDependencies+      GeneralizedNewtypeDeriving+      TypeFamilies   ghc-options: -Wall -Wcompat -Widentities -Wincomplete-record-updates -Wincomplete-uni-patterns -Wpartial-fields -Wredundant-constraints -fno-warn-unused-top-binds   build-depends:       base >=4.12 && <5     , deepseq >=1.4.4.0 && <2     , exceptions >=0.10 && <1+    , little-logger ==1.0.*     , microlens >=0.4 && <1     , microlens-mtl >=0.2 && <1     , mtl >=2.2 && <3

src/LittleRIO.hs view

@@ -1,11 +1,4 @@ {-# LANGUAGE DeriveAnyClass #-}-{-# LANGUAGE DeriveGeneric #-}-{-# LANGUAGE DeriveTraversable #-}-{-# LANGUAGE DerivingStrategies #-}-{-# LANGUAGE FlexibleInstances #-}-{-# LANGUAGE FunctionalDependencies #-}-{-# LANGUAGE GeneralizedNewtypeDeriving #-}-{-# LANGUAGE TypeFamilies #-} {-# LANGUAGE UndecidableInstances #-}  {- |@@ -59,10 +52,11 @@ import GHC.Generics (Generic) import Lens.Micro (Lens', lens) import Lens.Micro.Mtl (view)-import Prelude+import LittleLogger (LogActionWrapperM (..), MonadLogger)  newtype RIO env a = RIO { unRIO :: ReaderT env IO a }   deriving newtype (Functor, Applicative, Monad, MonadReader env, MonadIO, MonadThrow, MonadFail, MonadCatch, MonadMask, MonadUnliftIO)+  deriving MonadLogger via LogActionWrapperM env (RIO env)  instance Semigroup a => Semigroup (RIO env a) where   (<>) = liftA2 (<>)