File tree Expand file tree Collapse file tree 1 file changed +2
-0
lines changed Expand file tree Collapse file tree 1 file changed +2
-0
lines changed Original file line number Diff line number Diff line change @@ -143,6 +143,7 @@ import Control.Lens (
143
143
)
144
144
import Control.Lens qualified as L
145
145
import Control.Monad.Except (MonadError (.. ))
146
+ import Control.Monad.Reader (ReaderT (.. ))
146
147
import Control.Monad.Reader.Class (MonadReader (.. ))
147
148
import Control.Monad.State qualified as LazyState
148
149
import Control.Monad.State.Class (MonadState (.. ))
@@ -274,6 +275,7 @@ class (Monad m) => MonadBuildTx era m | m -> era where
274
275
addTxBuilder = lift . addTxBuilder
275
276
276
277
instance (MonadBuildTx era m ) => MonadBuildTx era (ExceptT e m )
278
+ instance (MonadBuildTx era m ) => MonadBuildTx era (ReaderT e m )
277
279
instance (MonadBuildTx era m ) => MonadBuildTx era (StrictState. StateT e m )
278
280
instance (MonadBuildTx era m ) => MonadBuildTx era (LazyState. StateT e m )
279
281
instance (Monoid w , MonadBuildTx era m ) => MonadBuildTx era (WriterT w m )
You can’t perform that action at this time.
0 commit comments