aboutsummaryrefslogtreecommitdiff
path: root/stdlib/test
diff options
context:
space:
mode:
authorEduardo Julian2018-12-28 21:29:33 -0400
committerEduardo Julian2018-12-28 21:29:33 -0400
commit013a71b684e8fd101980f32f54cf1046a7a45c31 (patch)
tree5fc5c1e881d620d778b1f5114c807b41dc9795b2 /stdlib/test
parent180f1586be76f22f79253c2dc9a5ad4d3d6d347e (diff)
Added machinery for methods.
Diffstat (limited to '')
-rw-r--r--stdlib/test/test/lux/host/jvm.jvm.lux23
1 files changed, 14 insertions, 9 deletions
diff --git a/stdlib/test/test/lux/host/jvm.jvm.lux b/stdlib/test/test/lux/host/jvm.jvm.lux
index 692e5eeda..701286455 100644
--- a/stdlib/test/test/lux/host/jvm.jvm.lux
+++ b/stdlib/test/test/lux/host/jvm.jvm.lux
@@ -11,7 +11,8 @@
[format
["." binary]]
[collection
- ["." dictionary]]]
+ ["." dictionary]
+ ["." row]]]
["." io (#+ IO)]
[world
["." file (#+ File)]
@@ -21,10 +22,9 @@
["/." loader (#+ Library)]
["/." version]
["/." name]
+ ["/." field]
[modifier
["/.M" class]
- ["/.M" field]
- ["/.M" method]
["/.M" inner]]]]
[math
["r" random]]]
@@ -53,18 +53,23 @@
(/name.internal "java.lang.Object")
(/name.internal full-name)
(list (/name.internal "java.io.Serializable")
- (/name.internal "java.lang.Runnable")))
- bytecode (binary.write /.classF class)
+ (/name.internal "java.lang.Runnable"))
+ (row.row)
+ (row.row)
+ (row.row))
+ bytecode (binary.write /.format class)
loader (/loader.memory (/loader.new-library []))]
- (exec (io.run (..write-class name))
+ (exec
+ ## TODO: Remove 'write-class' call.
+ (io.run (..write-class name))
($_ seq
(test "Can read generated class."
- (case (binary.read /.classF bytecode)
+ (case (binary.read /.format bytecode)
(#error.Success class)
true
(#error.Failure error)
- ## TODO: Remove log!
+ ## TODO: Remove 'log!' call.
(exec (log! error)
false)))
(test "Can generate a class."
@@ -73,7 +78,7 @@
true
(#error.Failure error)
- ## TODO: Remove log!
+ ## TODO: Remove 'log!' call.
(exec (log! error)
false)))
))))