first interpreter tests

test/risc/interpreter/assign/test_assign_local.rb

@@ -11,37 +11,36 @@ module Risc
 
     def test_chain
       #show_main_ticks # get output of what is
-      check_main_chain  [LoadConstant, RegToSlot, SlotToReg, RegToSlot, Branch, #5
+      check_main_chain [LoadConstant, RegToSlot, SlotToReg, RegToSlot, Branch, #5
                  SlotToReg, SlotToReg, RegToSlot, SlotToReg, SlotToReg, #10
-                 SlotToReg, FunctionReturn, Transfer, SlotToReg, SlotToReg, #15
-                 Syscall, NilClass,] #20
-      assert_equal 15 , get_return
+                 FunctionReturn, Transfer, SlotToReg, SlotToReg, Syscall, #15
+                 NilClass,] #20
+      assert_equal Parfait::Integer , get_return.class
+      assert_equal 15 , get_return.value
     end
-
     def test_call_main
       call_ins = ticks(main_at)
       assert_equal FunctionCall , call_ins.class
       assert  :main , call_ins.method.name
     end
     def test_load_15
-      load_ins = main_ticks(1)
-      assert_equal LoadConstant ,  load_ins.class
-      assert_equal Parfait::Integer , @interpreter.get_register(load_ins.register).class
-      assert_equal 15 , @interpreter.get_register(load_ins.register).value
+      assert_load 1 , Parfait::Integer , "id_integer_"
+      assert_equal 15 , @interpreter.get_register(@interpreter.instruction.register).value
+    end
+    def test_branch
+      assert_branch 5 , "return_label"
     end
     def test_return
-      ret = main_ticks(12)
+      ret = main_ticks(11)
       assert_equal FunctionReturn ,  ret.class
       link = @interpreter.get_register( ret.register )
-      assert_equal ::Integer , link.class
+      assert_equal Parfait::ReturnAddress , link.class
     end
     def test_transfer
-      transfer = main_ticks(13)
-      assert_equal Transfer ,  transfer.class
+      assert_transfer 12 , :message , :saved_message
     end
     def test_sys
-      sys = main_ticks(16)
-      assert_equal Syscall ,  sys.class
+      assert_syscall 15 , :exit
     end
   end
 end