aboutsummaryrefslogtreecommitdiff
path: root/lux-cl
diff options
context:
space:
mode:
authorEduardo Julian2021-09-08 21:44:06 -0400
committerEduardo Julian2021-09-08 21:44:06 -0400
commit77301f3a456c015daa9d8f9aa3d80fd4e45f8e7e (patch)
tree00f27e4cdebf5a1390bd9acc462d8ca95778f04e /lux-cl
parent880cb37c261df20b7b8d968a909557bbc63d6b7f (diff)
De-bracing part 0
Diffstat (limited to 'lux-cl')
-rw-r--r--lux-cl/source/program.lux6
1 files changed, 3 insertions, 3 deletions
diff --git a/lux-cl/source/program.lux b/lux-cl/source/program.lux
index 56fded738..744474bc9 100644
--- a/lux-cl/source/program.lux
+++ b/lux-cl/source/program.lux
@@ -186,11 +186,11 @@
[]
... Methods
(program/LuxADT
- [] (getValue self) java/lang/Object
+ [] (getValue self []) java/lang/Object
(:as java/lang/Object value))
(org/armedbear/lisp/LispObject
- [] (length self)
+ [] (length self [])
int
(|> value
(:as (Array java/lang/Object))
@@ -200,7 +200,7 @@
(~~ (template [<name>]
[(org/armedbear/lisp/LispObject
- [] (<name> self {idx int})
+ [] (<name> self [idx int])
org/armedbear/lisp/LispObject
(case (array.read! (|> idx java/lang/Integer::longValue (:as Nat))
(:as (Array java/lang/Object) value))