diff options
Diffstat (limited to 'stdlib/source/library/lux/data/collection/bits.lux')
-rw-r--r-- | stdlib/source/library/lux/data/collection/bits.lux | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/stdlib/source/library/lux/data/collection/bits.lux b/stdlib/source/library/lux/data/collection/bits.lux index 3db996fdf..b2fbeced2 100644 --- a/stdlib/source/library/lux/data/collection/bits.lux +++ b/stdlib/source/library/lux/data/collection/bits.lux @@ -78,7 +78,7 @@ .nat) 0 ... TODO: Remove 'no_op' once new-luxc is the official compiler. - (let [no_op (recur (-- size|output) output)] + (let [no_op (again (-- size|output) output)] no_op) chunk @@ -86,7 +86,7 @@ (: Bits (array.empty size|output)) output) (array.write! idx|output (.i64 chunk)) - (recur (-- size|output)))) + (again (-- size|output)))) output)))))] [one i64.one] @@ -104,7 +104,7 @@ (i64.and (..chunk idx reference)) ("lux i64 =" empty_chunk) .not) - (recur (++ idx))) + (again (++ idx))) #0)))) (def: .public (not input) @@ -119,7 +119,7 @@ (let [idx (-- size|output)] (case (|> input (..chunk idx) i64.not .nat) 0 - (recur (-- size|output) output) + (again (-- size|output) output) chunk (if (n.> 0 size|output) @@ -127,7 +127,7 @@ (: Bits (array.empty size|output)) output) (array.write! idx (.i64 chunk)) - (recur (-- size|output))) + (again (-- size|output))) output)))))) (template [<name> <op>] @@ -147,14 +147,14 @@ (<op> (..chunk idx param)) .nat) 0 - (recur (-- size|output) output) + (again (-- size|output) output) chunk (|> (if (same? ..empty output) (: Bits (array.empty size|output)) output) (array.write! idx (.i64 chunk)) - (recur (-- size|output)))) + (again (-- size|output)))) output)))))] [and i64.and] @@ -173,5 +173,5 @@ (.and ("lux i64 =" (..chunk idx reference) (..chunk idx sample)) - (recur (++ idx))) + (again (++ idx))) #1))))) |