more complex while test
that works, but does leave one wondering what is tested apart from the result (1)
This commit is contained in:
parent
6a8bb90704
commit
020bce740a
@ -14,6 +14,10 @@ module Mom
|
||||
raise "condition must be slot_definition #{condition}" unless condition.is_a?(SlotDefinition)
|
||||
end
|
||||
|
||||
def to_s
|
||||
"TruthCheck #{@condition} -> #{false_jump}"
|
||||
end
|
||||
|
||||
def to_risc(compiler)
|
||||
false_label = @false_jump.to_risc(compiler)
|
||||
left = @condition.to_register(compiler,self)
|
||||
|
59
test/risc/interpreter/test_while_count.rb
Normal file
59
test/risc/interpreter/test_while_count.rb
Normal file
@ -0,0 +1,59 @@
|
||||
require_relative "helper"
|
||||
|
||||
module Risc
|
||||
class InterpreterWhileCount < MiniTest::Test
|
||||
include Ticker
|
||||
|
||||
def setup
|
||||
@string_input = as_main 'a = 0; while( 0 > a); a = 1 + a;end;return a'
|
||||
super
|
||||
end
|
||||
|
||||
def test_if
|
||||
#show_main_ticks # get output of what is in main
|
||||
check_main_chain [Label, LoadConstant, SlotToReg, RegToSlot, Label,
|
||||
LoadConstant, LoadConstant, SlotToReg, RegToSlot, RegToSlot,
|
||||
SlotToReg, SlotToReg, RegToSlot, SlotToReg, SlotToReg,
|
||||
RegToSlot, SlotToReg, RegToSlot, SlotToReg, RegToSlot,
|
||||
LoadConstant, SlotToReg, RegToSlot, SlotToReg, SlotToReg,
|
||||
SlotToReg, SlotToReg, RegToSlot, LoadConstant, SlotToReg,
|
||||
RegToSlot, SlotToReg, LoadConstant, FunctionCall, Label,
|
||||
SlotToReg, SlotToReg, SlotToReg, SlotToReg, SlotToReg,
|
||||
OperatorInstruction, IsMinus, LoadConstant, Branch, Label,
|
||||
RegToSlot, SlotToReg, SlotToReg, RegToSlot, SlotToReg,
|
||||
SlotToReg, FunctionReturn, SlotToReg, SlotToReg, RegToSlot,
|
||||
SlotToReg, SlotToReg, LoadConstant, OperatorInstruction, IsZero,
|
||||
LoadConstant, OperatorInstruction, IsZero, LoadConstant, LoadConstant,
|
||||
SlotToReg, RegToSlot, RegToSlot, SlotToReg, SlotToReg,
|
||||
RegToSlot, SlotToReg, SlotToReg, RegToSlot, SlotToReg,
|
||||
RegToSlot, SlotToReg, RegToSlot, LoadConstant, SlotToReg,
|
||||
RegToSlot, SlotToReg, SlotToReg, SlotToReg, SlotToReg,
|
||||
RegToSlot, LoadConstant, SlotToReg, RegToSlot, SlotToReg,
|
||||
LoadConstant, FunctionCall, Label, SlotToReg, SlotToReg,
|
||||
SlotToReg, SlotToReg, SlotToReg, OperatorInstruction, LoadConstant,
|
||||
SlotToReg, SlotToReg, RegToSlot, RegToSlot, RegToSlot,
|
||||
SlotToReg, SlotToReg, RegToSlot, SlotToReg, SlotToReg,
|
||||
FunctionReturn, SlotToReg, SlotToReg, RegToSlot, Branch,
|
||||
Label, LoadConstant, LoadConstant, SlotToReg, RegToSlot,
|
||||
RegToSlot, SlotToReg, SlotToReg, RegToSlot, SlotToReg,
|
||||
SlotToReg, RegToSlot, SlotToReg, RegToSlot, SlotToReg,
|
||||
RegToSlot, LoadConstant, SlotToReg, RegToSlot, SlotToReg,
|
||||
SlotToReg, SlotToReg, SlotToReg, RegToSlot, LoadConstant,
|
||||
SlotToReg, RegToSlot, SlotToReg, LoadConstant, FunctionCall,
|
||||
Label, SlotToReg, SlotToReg, SlotToReg, SlotToReg,
|
||||
SlotToReg, OperatorInstruction, IsMinus, Label, LoadConstant,
|
||||
Label, RegToSlot, SlotToReg, SlotToReg, RegToSlot,
|
||||
SlotToReg, SlotToReg, FunctionReturn, SlotToReg, SlotToReg,
|
||||
RegToSlot, SlotToReg, SlotToReg, LoadConstant, OperatorInstruction,
|
||||
IsZero, Label, SlotToReg, SlotToReg, RegToSlot,
|
||||
SlotToReg, SlotToReg, RegToSlot, SlotToReg, SlotToReg,
|
||||
FunctionReturn, Transfer, Syscall, NilClass]
|
||||
assert_kind_of Parfait::Integer , get_return
|
||||
assert_equal 1 , get_return.value
|
||||
end
|
||||
def test_exit
|
||||
done = main_ticks(183)
|
||||
assert_equal Syscall , done.class
|
||||
end
|
||||
end
|
||||
end
|
Loading…
Reference in New Issue
Block a user