diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/lux/control/pipe.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/lux/control/pipe.lux b/stdlib/source/lux/control/pipe.lux index 8e8209b89..8700217e2 100644 --- a/stdlib/source/lux/control/pipe.lux +++ b/stdlib/source/lux/control/pipe.lux @@ -6,7 +6,7 @@ [data ["e" error] [collection - ["." list ("#/." fold monad)]]] + ["." list ("#;." fold monad)]]] [macro (#+ with-gensyms) ["s" syntax (#+ syntax: Syntax)] ["." code]]]) @@ -129,7 +129,7 @@ "Will become: [+50 +2 '+5']")} (with-gensyms [g!temp] (wrap (list (` (let [(~ g!temp) (~ prev)] - [(~+ (list/map (function (_ body) (` (|> (~ g!temp) (~+ body)))) + [(~+ (list;map (function (_ body) (` (|> (~ g!temp) (~+ body)))) paths))])))))) (syntax: #export (case> {branches (p.many (p.and s.any s.any))} @@ -149,5 +149,5 @@ +9 "nine" _ "???")))} (wrap (list (` (case (~ prev) - (~+ (list/join (list/map (function (_ [pattern body]) (list pattern body)) + (~+ (list;join (list;map (function (_ [pattern body]) (list pattern body)) branches)))))))) |