diff options
Diffstat (limited to 'stdlib/source/library/lux/data/collection/sequence.lux')
-rw-r--r-- | stdlib/source/library/lux/data/collection/sequence.lux | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/stdlib/source/library/lux/data/collection/sequence.lux b/stdlib/source/library/lux/data/collection/sequence.lux index fccc576df..c482ad8dc 100644 --- a/stdlib/source/library/lux/data/collection/sequence.lux +++ b/stdlib/source/library/lux/data/collection/sequence.lux @@ -14,7 +14,7 @@ [data ["[0]" bit] [collection - ["[0]" list ("[1]\[0]" monad)]]] + ["[0]" list ("[1]#[0]" monad)]]] [math [number ["n" nat]]]]]) @@ -132,9 +132,9 @@ branches (<>.some <code>.any)]) (with_identifiers [g!sequence] (let [body+ (` (let [(~+ (|> patterns - (list\each (function (_ pattern) + (list#each (function (_ pattern) (list (` [(~ pattern) (~ g!sequence)]) (` ((~! //.result) (~ g!sequence)))))) - list\conjoint))] + list#conjoint))] (~ body)))] (in (list& g!sequence body+ branches))))) |