diff options
| author | Eduardo Julian | 2021-09-14 16:41:18 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2021-09-14 16:41:18 -0400 |
| commit | ccfa75463cd7c702f41c3dae5cbdaeade7ba5c31 (patch) | |
| tree | c47937a8f62a25ef945a876b3af76c5fca989db9 /stdlib/source/library/lux.lux | |
| parent | ea15b844b51ff60f9785c6791507f813729f85c3 (diff) | |
Re-named "recur" to "again".
Diffstat (limited to 'stdlib/source/library/lux.lux')
| -rw-r--r-- | stdlib/source/library/lux.lux | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/stdlib/source/library/lux.lux b/stdlib/source/library/lux.lux index 6dff86c3c..ad9fcc8d8 100644 --- a/stdlib/source/library/lux.lux +++ b/stdlib/source/library/lux.lux @@ -1927,10 +1927,10 @@ _ (let' [loop ("lux type check" (-> Nat Text Text) - (function' recur [input output] + (function' again [input output] (if ("lux i64 =" 0 input) output - (recur (n// 10 input) + (again (n// 10 input) (text#composite (|> input (n/% 10) digit::format) output)))))] (loop value ""))} @@ -1950,10 +1950,10 @@ "+" "-")] (("lux type check" (-> Int Text Text) - (function' recur [input output] + (function' again [input output] (if ("lux i64 =" +0 input) (text#composite sign output) - (recur ("lux i64 /" +10 input) + (again ("lux i64 /" +10 input) (text#composite (|> input ("lux i64 %" +10) ("lux type as" Nat) digit::format) output))))) (|> value ("lux i64 /" +10) int#abs) @@ -3336,10 +3336,10 @@ (def: (replaced pattern replacement template) (-> Text Text Text Text) ((: (-> Text Text Text) - (function (recur left right) + (function (again left right) (case (..text#split_by pattern right) {#Some [pre post]} - (recur ($_ "lux text concat" left pre replacement) post) + (again ($_ "lux text concat" left pre replacement) post) {#None} ("lux text concat" left right)))) @@ -3764,7 +3764,7 @@ {#Some tags&members} (do meta_monad [full_body ((: (-> Symbol [(List Symbol) (List Type)] Code (Meta Code)) - (function (recur source [tags members] target) + (function (again source [tags members] target) (let [locals (list#each (function (_ [t_module t_name]) [[t_module t_name] ["" (..module_alias (list t_name) alias)]]) @@ -3782,7 +3782,7 @@ [m_implementation (record_slots m_type)] (case m_implementation {#Some m_tags&members} - (recur m_local + (again m_local m_tags&members enhanced_target) @@ -4324,7 +4324,7 @@ {#Some [name bindings body]} (^ (list [_ {#Tuple bindings}] body)) - {#Some [(local_symbol$ "recur") bindings body]} + {#Some [(local_symbol$ "again") bindings body]} _ {#None})] |