diff options
Diffstat (limited to 'stdlib/source/lux/control/reader.lux')
-rw-r--r-- | stdlib/source/lux/control/reader.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/lux/control/reader.lux b/stdlib/source/lux/control/reader.lux index b63504294..21537c31b 100644 --- a/stdlib/source/lux/control/reader.lux +++ b/stdlib/source/lux/control/reader.lux @@ -2,7 +2,7 @@ lux (lux (control functor applicative - ["M" monad #*]))) + [monad #+ do Monad]))) ## [Types] (type: #export (Reader r a) @@ -50,7 +50,7 @@ (struct: #export (ReaderT Monad<M>) {#;doc "Monad transformer for Reader."} (All [M] (-> (Monad M) (All [e] (Monad (All [a] (Reader e (M a))))))) - (def: applicative (compA Applicative<Reader> (get@ #M;applicative Monad<M>))) + (def: applicative (compA Applicative<Reader> (get@ #monad;applicative Monad<M>))) (def: (join eMeMa) (function [env] (do Monad<M> |