aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/control/writer.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/lux/control/writer.lux')
-rw-r--r--stdlib/source/lux/control/writer.lux2
1 files changed, 1 insertions, 1 deletions
diff --git a/stdlib/source/lux/control/writer.lux b/stdlib/source/lux/control/writer.lux
index a93242297..fc964537c 100644
--- a/stdlib/source/lux/control/writer.lux
+++ b/stdlib/source/lux/control/writer.lux
@@ -60,7 +60,7 @@
(def: (join MlMla)
(do Monad<M>
[## TODO: Remove once new-luxc is the standard compiler.
- [l1 Mla] (: (($ +1) (Writer ($ +0) (($ +1) (Writer ($ +0) ($ +2)))))
+ [l1 Mla] (: (($ |1) (Writer ($ |0) (($ |1) (Writer ($ |0) ($ |2)))))
MlMla)
## [l1 Mla] MlMla
[l2 a] Mla]