aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/control/applicative.lux
diff options
context:
space:
mode:
authorEduardo Julian2018-01-03 23:57:12 -0400
committerEduardo Julian2018-01-03 23:57:12 -0400
commit5c18722100637a61a6e52b4471a2068f37a3dcff (patch)
tree9c49e2599409293db78174299094be1e0202b6cb /stdlib/source/lux/control/applicative.lux
parent91a14e9b4c6611399d33166710081982cf984a00 (diff)
- Small refactorings.
Diffstat (limited to 'stdlib/source/lux/control/applicative.lux')
-rw-r--r--stdlib/source/lux/control/applicative.lux1
1 files changed, 1 insertions, 0 deletions
diff --git a/stdlib/source/lux/control/applicative.lux b/stdlib/source/lux/control/applicative.lux
index 54cef5c45..a827a06d3 100644
--- a/stdlib/source/lux/control/applicative.lux
+++ b/stdlib/source/lux/control/applicative.lux
@@ -22,6 +22,7 @@
(def: wrap
(|>> (:: Applicative<G> wrap) (:: Applicative<F> wrap)))
(def: (apply fgf fgx)
+ ## TODO: Switch from this version to the one below (in comments) ASAP.
(let [fgf' (:: Applicative<F> apply
(:: Applicative<F> wrap (:: Applicative<G> apply))
fgf)]