3bc85805a4
as they are typed, those functions don't resolve on Risc, but the register type miscother changes from previous commits
72 lines
2.6 KiB
Ruby
72 lines
2.6 KiB
Ruby
require_relative "../helper"
|
|
|
|
module Risc
|
|
class TestPuts < MiniTest::Test
|
|
include Ticker
|
|
|
|
def setup
|
|
@string_input = as_main(" return 'Hello again'.putstring ")
|
|
super
|
|
end
|
|
|
|
def test_chain
|
|
#show_main_ticks # get output of what is
|
|
check_main_chain [LoadConstant, LoadConstant, SlotToReg, RegToSlot, RegToSlot,
|
|
SlotToReg, SlotToReg, RegToSlot, SlotToReg, SlotToReg,
|
|
RegToSlot, SlotToReg, RegToSlot, Branch, SlotToReg,
|
|
RegToSlot, LoadConstant, SlotToReg, RegToSlot, LoadConstant,
|
|
SlotToReg, RegToSlot, SlotToReg, FunctionCall, SlotToReg,
|
|
SlotToReg, Transfer, Syscall, Transfer, Transfer,
|
|
LoadConstant, SlotToReg, SlotToReg, RegToSlot, RegToSlot,
|
|
RegToSlot, SlotToReg, Branch, SlotToReg, RegToSlot,
|
|
SlotToReg, SlotToReg, SlotToReg, FunctionReturn, SlotToReg,
|
|
SlotToReg, RegToSlot, Branch, SlotToReg, SlotToReg,
|
|
RegToSlot, SlotToReg, SlotToReg, RegToSlot, SlotToReg,
|
|
SlotToReg, SlotToReg, FunctionReturn, Transfer, SlotToReg,
|
|
Branch, SlotToReg, Syscall, NilClass]
|
|
assert_equal "Hello again" , @interpreter.stdout
|
|
assert_equal 11 , get_return #bytes written
|
|
end
|
|
def test_call
|
|
cal = main_ticks(24)
|
|
assert_equal FunctionCall , cal.class
|
|
assert_equal :putstring , cal.method.name
|
|
end
|
|
|
|
def test_putstring_sys
|
|
done = main_ticks(28)
|
|
assert_equal Syscall , done.class
|
|
assert_equal "Hello again" , @interpreter.stdout
|
|
assert_equal 11 , @interpreter.get_register(:r0)
|
|
assert_equal Parfait::Word , @interpreter.get_register(:r1).class
|
|
assert_equal "Hello again" , @interpreter.get_register(:r1).to_string
|
|
end
|
|
def test_move_sys_return
|
|
sl = main_ticks(29)
|
|
assert_equal Transfer , sl.class
|
|
assert_equal :r0 , sl.from.symbol
|
|
assert_equal :r2 , sl.to.symbol
|
|
assert_equal 11 , @interpreter.get_register(:r2)
|
|
end
|
|
def test_restore_message
|
|
sl = main_ticks(30)
|
|
assert_equal Transfer , sl.class
|
|
assert_equal :r8 , sl.from.symbol
|
|
assert_equal :r0 , sl.to.symbol
|
|
assert_equal Parfait::Message , @interpreter.get_register(:r0).class
|
|
end
|
|
def test_save_sys_return
|
|
sl = main_ticks(35)
|
|
assert_equal RegToSlot , sl.class
|
|
assert_equal :r2 , sl.register.symbol #return
|
|
assert_equal :r3 , sl.array.symbol #parfait integer
|
|
assert_equal 2 , sl.index
|
|
end
|
|
def test_return
|
|
done = main_ticks(44)
|
|
assert_equal FunctionReturn , done.class
|
|
end
|
|
|
|
end
|
|
end
|