aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test
diff options
context:
space:
mode:
authorEduardo Julian2022-07-26 18:08:04 -0400
committerEduardo Julian2022-07-26 18:08:04 -0400
commitfeacd79496ae9c76492d5a12d30b78724b642654 (patch)
treea85708d1bfe43a98ba62b7f8589dcc95a71f86f5 /stdlib/source/test
parentdec796a9838e39148c007f3f3d360964d7cb68de (diff)
Made inlined functions into first-class macros.
Diffstat (limited to '')
-rw-r--r--stdlib/source/test/lux/control/function/inline.lux7
-rw-r--r--stdlib/source/test/lux/meta/extension.lux8
-rw-r--r--stdlib/source/test/lux/meta/target/js.lux8
3 files changed, 12 insertions, 11 deletions
diff --git a/stdlib/source/test/lux/control/function/inline.lux b/stdlib/source/test/lux/control/function/inline.lux
index 441ddef3c..94a21ede2 100644
--- a/stdlib/source/test/lux/control/function/inline.lux
+++ b/stdlib/source/test/lux/control/function/inline.lux
@@ -15,9 +15,10 @@
(template (_ m0 m1)
[(i.+ (i.* m0 m0) (i.* m1 m1))]))
-(/.inlined .public (quadrance/2 m0 m1)
- (-> Int Int Int)
- (!quadrance/2 m0 m1))
+(def .public quadrance/2
+ (/.inlined (_ m0 m1)
+ (-> Int Int Int)
+ (!quadrance/2 m0 m1)))
(def .public test
Test
diff --git a/stdlib/source/test/lux/meta/extension.lux b/stdlib/source/test/lux/meta/extension.lux
index 8be85f9c0..bfe11a0e0 100644
--- a/stdlib/source/test/lux/meta/extension.lux
+++ b/stdlib/source/test/lux/meta/extension.lux
@@ -33,13 +33,13 @@
["[0]" ruby]
["[0]" php]
["[0]" scheme]
- ["[0]" jvm
- (.,, (.for "JVM" (.,, (.these ["[1]" bytecode]
+ (.,, (.for "JVM" (.,, (.these ["[0]" jvm
+ ["[1]" bytecode]
["[0]" class]
["[0]" version]
[encoding
- ["[0]" name]]))
- (.,, (.these))))]]
+ ["[0]" name]]]))
+ (.,, (.these))))]
[compiler
["[0]" phase]
[meta
diff --git a/stdlib/source/test/lux/meta/target/js.lux b/stdlib/source/test/lux/meta/target/js.lux
index 9604b26b3..94fc0c470 100644
--- a/stdlib/source/test/lux/meta/target/js.lux
+++ b/stdlib/source/test/lux/meta/target/js.lux
@@ -3,13 +3,13 @@
[lux (.except)
["_" test (.only Test)]
[abstract
- [monad (.only do)]
- ["[0]" predicate]]
+ [monad (.only do)]]
[control
["[0]" pipe]
- ["[0]" function]
["[0]" maybe (.use "[1]#[0]" functor)]
- ["[0]" try (.only Try) (.use "[1]#[0]" functor)]]
+ ["[0]" try (.only Try) (.use "[1]#[0]" functor)]
+ ["[0]" function (.only)
+ ["[0]" predicate]]]
[data
["[0]" bit (.use "[1]#[0]" equivalence)]
["[0]" text (.only \n) (.use "[1]#[0]" equivalence)