require_relative "../helper"

module Risc
  class TestCallSimpleArgs < MiniTest::Test
    include Statements

    def setup
      super
      @input = "5.get_internal_word(1)"
      @expect = [LoadConstant, LoadConstant, SlotToReg, SlotToReg, RegToSlot,
                 RegToSlot, RegToSlot, RegToSlot, LoadConstant, SlotToReg,
                 RegToSlot, LoadConstant, SlotToReg, SlotToReg, RegToSlot,
                 LoadConstant, SlotToReg, RegToSlot, SlotToReg, FunctionCall,
                 Label, SlotToReg, RegToSlot, Branch]
    end

    def test_send_instructions
      assert_nil msg = check_nil , msg
    end
    def test_load_5
      produced = produce_body
      assert_equal LoadConstant , produced.next(8).class
      assert_equal 5 , produced.next(8).constant.value
    end
    def base
      11
    end
    def test_load_arg_const
      produced = produce_body
      assert_load( produced.next(base) , Parfait::Integer )
      assert_equal 1 , produced.next(base).constant.value
    end
    def test_load_next_m
      produced = produce_body.next(base+1)
      assert_slot_to_reg( produced ,:r0 ,1 , :r2 )
    end
    def test_load_args
      produced = produce_body.next(base+2)
      assert_slot_to_reg( produced ,:r2 ,8 , :r2 )
    end
    def test_store_arg_at
      produced = produce_body.next(base+3)
      assert_reg_to_slot( produced ,:r1 ,:r2 , 1 )
    end
    def test_load_label
      produced = produce_body.next(base+4)
      assert_load( produced , Label )
    end
    def test_load_some
      produced = produce_body.next(base+5)
      assert_slot_to_reg( produced ,:r0 ,1 , :r2 )
    end
    def test_store_
      produced = produce_body.next(base+6)
      assert_reg_to_slot( produced ,:r1 ,:r2 , 4 )
    end

    def test_swap_messages
      produced = produce_body.next(base+7)
      assert_slot_to_reg( produced ,:r0 ,1 , :r0 )
    end

    def test_function_call
      produced = produce_body
      assert_equal FunctionCall , produced.next(base+8).class
      assert_equal :get_internal_word , produced.next(base+8).method.name
    end
    def test_check_continue
      produced = produce_body
      assert produced.next(base+9).name.start_with?("continue_")
    end
  end
end