aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/lux.lux
diff options
context:
space:
mode:
authorEduardo Julian2019-04-28 01:48:04 -0400
committerEduardo Julian2019-04-28 01:48:04 -0400
commit41b83b7a2d3be8f454f780dca497c4eeed900bbf (patch)
tree8b5eadd88e0f51a2d0e891e5c0708f0fa9b740fb /stdlib/source/lux.lux
parent78044833d179b8dd168c665f9616ce78901f0ff4 (diff)
Turned all "lux frac ???" extensions to "lux f64 ???".
Diffstat (limited to 'stdlib/source/lux.lux')
-rw-r--r--stdlib/source/lux.lux18
1 files changed, 9 insertions, 9 deletions
diff --git a/stdlib/source/lux.lux b/stdlib/source/lux.lux
index 6fe8100ba..be997fc2e 100644
--- a/stdlib/source/lux.lux
+++ b/stdlib/source/lux.lux
@@ -2373,7 +2373,7 @@
[ Int "lux i64 =" "lux int <" i/= i/< i/<= i/> i/>=
"Int(eger) equivalence." "Int(eger) less-than." "Int(eger) less-than-equal." "Int(eger) greater-than." "Int(eger) greater-than-equal."]
- [Frac "lux frac =" "lux frac <" f/= f/< f/<= f/> f/>=
+ [Frac "lux f64 =" "lux f64 <" f/= f/< f/<= f/> f/>=
"Frac(tion) equivalence." "Frac(tion) less-than." "Frac(tion) less-than-equal." "Frac(tion) greater-than." "Frac(tion) greater-than-equal."]
)
@@ -2441,11 +2441,11 @@
[ Int i// "lux int /" "Int(eger) division."]
[ Int i/% "lux int %" "Int(eger) remainder."]
- [Frac f/+ "lux frac +" "Frac(tion) addition."]
- [Frac f/- "lux frac -" "Frac(tion) substraction."]
- [Frac f/* "lux frac *" "Frac(tion) multiplication."]
- [Frac f// "lux frac /" "Frac(tion) division."]
- [Frac f/% "lux frac %" "Frac(tion) remainder."]
+ [Frac f/+ "lux f64 +" "Frac(tion) addition."]
+ [Frac f/- "lux f64 -" "Frac(tion) substraction."]
+ [Frac f/* "lux f64 *" "Frac(tion) multiplication."]
+ [Frac f// "lux f64 /" "Frac(tion) division."]
+ [Frac f/% "lux f64 %" "Frac(tion) remainder."]
)
(def:''' #export (r/* param subject)
@@ -2608,7 +2608,7 @@
(def:''' (frac@encode x)
#Nil
(-> Frac Text)
- ("lux frac encode" x))
+ ("lux f64 encode" x))
(def:''' (multiple? div n)
#Nil
@@ -5183,8 +5183,8 @@
(-> <from> <to>)
(<proc> n))]
- [frac-to-int Frac Int "lux frac int"]
- [int-to-frac Int Frac "lux int frac"]
+ [frac-to-int Frac Int "lux f64 i64"]
+ [int-to-frac Int Frac "lux int f64"]
)
(def: (find-baseline-column code)