aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/lux.lux
diff options
context:
space:
mode:
authorEduardo Julian2019-02-13 18:43:17 -0400
committerEduardo Julian2019-02-13 18:43:17 -0400
commit48f11e1d8394b516b778a0e76c5d29bf64492261 (patch)
treed2553d0a54fe262449ce947ff2fcb084f86a9577 /stdlib/source/test/lux.lux
parent41d54d8c9f11cde7fb41578d5c2763906942884d (diff)
Re-named "logical-right-shift" to "logic-right-shift".
Diffstat (limited to '')
-rw-r--r--stdlib/source/test/lux.lux21
1 files changed, 15 insertions, 6 deletions
diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux
index d754862a8..391526efb 100644
--- a/stdlib/source/test/lux.lux
+++ b/stdlib/source/test/lux.lux
@@ -26,6 +26,20 @@
[host
[js (#+)]
[scheme (#+)]]
+ [tool
+ [compiler
+ [phase
+ [translation
+ [js
+ [runtime (#+)]
+ [primitive (#+)]
+ [structure (#+)]
+ [reference (#+)]]
+ [scheme
+ [runtime (#+)]
+ [primitive (#+)]
+ [structure (#+)]
+ [reference (#+)]]]]]]
## [control
## ["._" contract]
## ["._" concatenative]
@@ -62,17 +76,12 @@
## ["._" environment]
## ["._" console]]
## [compiler
- ## [host
- ## [".H" scheme]]
## ["._" cli]
## ["._" default
## ["._" evaluation]
## [phase
## ["._" translation
## [scheme
- ## ["._scheme" primitive]
- ## ["._scheme" structure]
- ## ["._scheme" reference]
## ["._scheme" function]
## ["._scheme" loop]
## ["._scheme" case]
@@ -289,7 +298,7 @@
(def: frac-rev
(r.Random Rev)
(|> r.rev
- (:: r.functor map (|>> (i64.left-shift 11) (i64.logical-right-shift 11)))))
+ (:: r.functor map (|>> (i64.left-shift 11) (i64.logic-right-shift 11)))))
(def: prelude-macros
Test