positioning code by setting first method code

codes will initial (and on reset) propagate the whole chain

test/risc/position/test_code_position.rb

@@ -6,15 +6,16 @@ module Risc
     def setup
       Risc.machine.boot
       @binary = Parfait::BinaryCode.new(1)
+      @method = Parfait.object_space.types.values.first.methods
       @label = Label.new("hi","ho")
     end
     def test_set_bin
-      pos = Position.set( @binary , 0 , Parfait.object_space.get_main)
+      pos = Position.set( @binary , 0 , @method)
       assert_equal Position::CodePosition , pos.class
     end
     def test_bin_propagates_existing
       @binary.extend_to(16)
-      Position.set( @binary , 0 , Parfait.object_space.get_main)
+      Position.set( @binary , 0 , @method)
       assert_equal @binary.padded_length , Position.get(@binary.next).at
     end
     def test_bin_propagates_after
@@ -22,5 +23,14 @@ module Risc
       @binary.extend_to(16)
       assert_equal @binary.padded_length , Position.get(@binary.next).at
     end
+    def test_type
+      pos = Position.set( @binary , 0 , @method)
+      assert_equal "Word_Type" , pos.method.for_type.name
+    end
+    def test_next
+      pos = Position.set( @binary , 0 , @method)
+      type = pos.next_type(pos.method.for_type)
+      assert_equal "Integer_Type" , type.name
+    end
   end
 end