From c006a5fe8e82f6fc7c8cdb9db0f44c06d229f34e Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Thu, 15 Oct 2020 01:01:21 -0400 Subject: Re-named "to-text" functions to "format". --- stdlib/source/lux.lux | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'stdlib/source/lux.lux') diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux index 01401ea29..4f6a134a4 100644 --- a/stdlib/source/lux.lux +++ b/stdlib/source/lux.lux @@ -2206,7 +2206,7 @@ (-> Bit Text) (if x "#1" "#0")) -(def:''' (digit-to-text digit) +(def:''' (digit::format digit) #Nil (-> Nat Text) ({0 "0" @@ -2228,7 +2228,7 @@ (if ("lux i64 =" 0 input) output (recur (n// 10 input) - (text@compose (|> input (n/% 10) digit-to-text) + (text@compose (|> input (n/% 10) digit::format) output)))))] (loop value ""))} value)) @@ -2253,10 +2253,10 @@ (if ("lux i64 =" +0 input) (text@compose sign output) (recur ("lux i64 /" +10 input) - (text@compose (|> input ("lux i64 %" +10) ("lux coerce" Nat) digit-to-text) + (text@compose (|> input ("lux i64 %" +10) ("lux coerce" Nat) digit::format) output))))) (|> value ("lux i64 /" +10) int@abs) - (|> value ("lux i64 %" +10) int@abs ("lux coerce" Nat) digit-to-text))))) + (|> value ("lux i64 %" +10) int@abs ("lux coerce" Nat) digit::format))))) (def:''' (frac@encode x) #Nil -- cgit v1.2.3