diff options
Diffstat (limited to 'stdlib/source/library/lux/control/writer.lux')
| -rw-r--r-- | stdlib/source/library/lux/control/writer.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/library/lux/control/writer.lux b/stdlib/source/library/lux/control/writer.lux index bfbf6183e..b8326b542 100644 --- a/stdlib/source/library/lux/control/writer.lux +++ b/stdlib/source/library/lux/control/writer.lux @@ -29,7 +29,7 @@ (All (_ l) (-> (Monoid l) (Apply (Writer l)))) - (def: &functor ..functor) + (def: functor ..functor) (def: (on fa ff) (let [[log1 f] ff @@ -40,7 +40,7 @@ (All (_ l) (-> (Monoid l) (Monad (Writer l)))) - (def: &functor ..functor) + (def: functor ..functor) (def: in (|>> [(# monoid identity)])) @@ -52,8 +52,8 @@ (implementation: .public (with monoid monad) (All (_ l M) (-> (Monoid l) (Monad M) (Monad (All (_ a) (M (Writer l a)))))) - (def: &functor - (functor.composite (the monad.&functor monad) + (def: functor + (functor.composite (the monad.functor monad) ..functor)) (def: in |