diff options
Diffstat (limited to 'lux-ruby/source/program.lux')
| -rw-r--r-- | lux-ruby/source/program.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/lux-ruby/source/program.lux b/lux-ruby/source/program.lux index 5d8c81858..3e6a4d638 100644 --- a/lux-ruby/source/program.lux +++ b/lux-ruby/source/program.lux @@ -383,7 +383,7 @@ (let [member (ffi.array_read 0 args)] (<| (case (ffi.check org/jruby/RubyFixnum member) (#.Some member) - (case (array.read (org/jruby/RubyFixnum::getLongValue member) value) + (case (array.read! (org/jruby/RubyFixnum::getLongValue member) value) (#.Some value) (wrapped_lux_value lux_structure value) @@ -396,14 +396,14 @@ (case (:as Text (org/jruby/RubyString::asJavaString member)) (^ (static runtime.variant_tag_field)) (|> value - (array.read 0) + (array.read! 0) maybe.assume (:as java/lang/Integer) java/lang/Integer::longValue (org/jruby/RubyFixnum::new ..initial_ruby_runtime)) (^ (static runtime.variant_flag_field)) - (case (array.read 1 value) + (case (array.read! 1 value) #.None ..ruby_nil @@ -411,7 +411,7 @@ ..lux_unit) (^ (static runtime.variant_value_field)) - (case (array.read 2 value) + (case (array.read! 2 value) (#.Some value) (wrapped_lux_value lux_structure value) |