.
This commit is contained in:
@@ -341,21 +341,21 @@ do TEST "VM: GC strings"
|
||||
end
|
||||
|
||||
do TEST "VM: arrays"
|
||||
local vm = VM.new():set_debug(true):load(assemble [
|
||||
local vm = VM.new():set_debug(true):load(assemble [[
|
||||
.func 0
|
||||
newa
|
||||
pushi 10
|
||||
seta 0
|
||||
seti 0
|
||||
pushi 20
|
||||
seta 1
|
||||
seti 1
|
||||
pushi 30
|
||||
seta 2
|
||||
geta 1
|
||||
]):call(0)
|
||||
seti 2
|
||||
geti 1
|
||||
ret
|
||||
]]):call(0)
|
||||
|
||||
print(vm:debug_heap())
|
||||
assert_eq(vm:to_integer(-1), 20)
|
||||
assert_eq(vm:is(-2, 'array'), true)
|
||||
assert_eq(vm.heap:size(), 1)
|
||||
end
|
||||
|
||||
|
||||
Reference in New Issue
Block a user