aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux/data/number/ratio.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/lux/data/number/ratio.lux')
-rw-r--r--stdlib/source/lux/data/number/ratio.lux4
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/lux/data/number/ratio.lux b/stdlib/source/lux/data/number/ratio.lux
index 83f987827..51e9464b1 100644
--- a/stdlib/source/lux/data/number/ratio.lux
+++ b/stdlib/source/lux/data/number/ratio.lux
@@ -136,7 +136,7 @@
(struct: #export _ (Codec Text Ratio)
(def: (encode (^slots [#numerator #denominator]))
- ($_ Text/append (part-encode numerator) separator (part-encode denominator)))
+ ($_ Text/compose (part-encode numerator) separator (part-encode denominator)))
(def: (decode input)
(case (text;split-with separator input)
@@ -148,7 +148,7 @@
#denominator denominator})))
#;None
- (#;Left (Text/append "Invalid syntax for ratio: " input)))))
+ (#;Left (Text/compose "Invalid syntax for ratio: " input)))))
(syntax: #export (ratio numerator [?denominator (p;opt s;any)])
{#;doc (doc "Rational literals."