aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/lux.lux
diff options
context:
space:
mode:
authorEduardo Julian2019-03-13 21:14:22 -0400
committerEduardo Julian2019-03-13 21:14:22 -0400
commit8e4b93bfc90ca81d615bf9dd5af43f29fdd0f5ae (patch)
tree0b343949908c11f8f27d70e4d40b1ccd0f969add /stdlib/source/test/lux.lux
parent810c2c9f524603c161f265e4ed17c6556bdef959 (diff)
Replaced the digit separator in numbers from "_" to ",".
Diffstat (limited to '')
-rw-r--r--stdlib/source/test/lux.lux15
1 files changed, 7 insertions, 8 deletions
diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux
index c2ca8b3ba..87bf92b1b 100644
--- a/stdlib/source/test/lux.lux
+++ b/stdlib/source/test/lux.lux
@@ -5,7 +5,6 @@
[case (#+)]
[loop (#+)]
[function (#+)]
- [expression (#+)]
[extension (#+)
[common (#+)]
[host (#+)]])]
@@ -40,10 +39,10 @@
[tool
[compiler
[phase
- [translation
- [scheme
+ [generation
+ [scheme (#+)
<host-modules>]
- [js
+ [js (#+)
<host-modules>]]]]]
## [control
## ["._" contract]
@@ -85,7 +84,7 @@
## ["._" default
## ["._" evaluation]
## [phase
- ## ["._" translation
+ ## ["._" generation
## [scheme
## ["._scheme" function]
## ["._scheme" loop]
@@ -397,11 +396,11 @@
(..conversion <gen> <forward> <backward> <=>))]
["Int -> Nat"
- i/= .nat .int (r/map (i/% +1_000_000) r.int)]
+ i/= .nat .int (r/map (i/% +1,000,000) r.int)]
["Nat -> Int"
- n/= .int .nat (r/map (n/% 1_000_000) r.nat)]
+ n/= .int .nat (r/map (n/% 1,000,000) r.nat)]
["Int -> Frac"
- i/= int-to-frac frac-to-int (r/map (i/% +1_000_000) r.int)]
+ i/= int-to-frac frac-to-int (r/map (i/% +1,000,000) r.int)]
["Frac -> Int"
f/= frac-to-int int-to-frac (r/map math.floor r.frac)]
["Rev -> Frac"