2017-08-30 21:27:12 +02:00
|
|
|
require_relative "helper"
|
|
|
|
|
2019-10-03 23:36:49 +02:00
|
|
|
module Sol
|
2019-10-03 19:55:41 +02:00
|
|
|
class TestConditionIfSlotMachine < MiniTest::Test
|
2019-10-03 23:36:49 +02:00
|
|
|
include SolCompile
|
2017-08-30 21:27:12 +02:00
|
|
|
|
|
|
|
def setup
|
2019-09-12 21:27:10 +02:00
|
|
|
@compiler = compile_main( "if(5.div4) ; @a = 6 ; else; @a = 5 ; end;return" , "Integer.div4")
|
2019-10-03 19:55:41 +02:00
|
|
|
@ins = @compiler.slot_instructions.next
|
2017-08-30 21:27:12 +02:00
|
|
|
end
|
|
|
|
|
2019-08-13 10:14:36 +02:00
|
|
|
def test_condition
|
2019-08-16 17:42:57 +02:00
|
|
|
assert_equal TruthCheck , @ins.next(3).class
|
2017-08-30 21:54:03 +02:00
|
|
|
end
|
2019-08-13 10:14:36 +02:00
|
|
|
def test_condition_is_slot
|
2020-02-15 15:02:03 +01:00
|
|
|
assert_equal SlottedMessage , @ins.next(3).condition.class , @ins
|
2018-03-16 14:35:22 +01:00
|
|
|
end
|
2019-08-16 17:42:57 +02:00
|
|
|
def test_hoisted_call
|
2018-03-21 14:24:42 +01:00
|
|
|
assert_equal SimpleCall , @ins.next(2).class
|
2018-04-19 09:00:55 +02:00
|
|
|
assert_equal :div4 , @ins.next(2).method.name
|
2017-09-04 20:00:29 +02:00
|
|
|
end
|
2019-08-13 10:14:36 +02:00
|
|
|
def test_array
|
2019-08-16 17:42:57 +02:00
|
|
|
check_array [MessageSetup, ArgumentTransfer, SimpleCall, TruthCheck, Label ,
|
|
|
|
SlotLoad, Jump, Label, SlotLoad, Label ,
|
2019-08-17 22:29:42 +02:00
|
|
|
SlotLoad, ReturnJump,Label, ReturnSequence, Label] , @ins
|
2017-08-30 21:27:12 +02:00
|
|
|
end
|
2018-03-16 14:35:22 +01:00
|
|
|
|
2017-08-30 21:27:12 +02:00
|
|
|
end
|
|
|
|
end
|