aboutsummaryrefslogtreecommitdiff
path: root/lux-cl
diff options
context:
space:
mode:
authorEduardo Julian2021-08-14 03:09:58 -0400
committerEduardo Julian2021-08-14 03:09:58 -0400
commit6fd22846f21b8b70b7867e989109d14a366c0a3e (patch)
tree9086774968ad944133dc5cf29c546add6e13a4b6 /lux-cl
parente53c1a090eb9cfac3cb23d10d981648d02518ed1 (diff)
Moved documentation-generation machinery to its own module.
Diffstat (limited to 'lux-cl')
-rw-r--r--lux-cl/source/program.lux4
1 files changed, 2 insertions, 2 deletions
diff --git a/lux-cl/source/program.lux b/lux-cl/source/program.lux
index 41e588f56..09b9b02cd 100644
--- a/lux-cl/source/program.lux
+++ b/lux-cl/source/program.lux
@@ -202,8 +202,8 @@
[(org/armedbear/lisp/LispObject
[] (<name> self {idx int})
org/armedbear/lisp/LispObject
- (case (array.read (|> idx java/lang/Integer::longValue (:as Nat))
- (:as (Array java/lang/Object) value))
+ (case (array.read! (|> idx java/lang/Integer::longValue (:as Nat))
+ (:as (Array java/lang/Object) value))
(#.Some sub)
(to_sub sub)