diff options
author | Eduardo Julian | 2019-03-13 21:14:22 -0400 |
---|---|---|
committer | Eduardo Julian | 2019-03-13 21:14:22 -0400 |
commit | 8e4b93bfc90ca81d615bf9dd5af43f29fdd0f5ae (patch) | |
tree | 0b343949908c11f8f27d70e4d40b1ccd0f969add /stdlib/source/test/lux.lux | |
parent | 810c2c9f524603c161f265e4ed17c6556bdef959 (diff) |
Replaced the digit separator in numbers from "_" to ",".
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/test/lux.lux | 15 |
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" |