adding arg length to call sequence

and fix all the tests that affects

test/compiler/fragments/test_foo.rb

@@ -16,7 +16,7 @@ class Object
   end
 end
 HERE
-    @length = 36
+    @length = 38
     check
   end
 

test/compiler/fragments/test_functions.rb

@@ -28,7 +28,7 @@ class Object
   end
 end
 HERE
-  @length = 179
+  @length = 191
   check
 
   end

test/compiler/fragments/test_hello.rb

@@ -11,7 +11,7 @@ class Object
   end
 end
 HERE
-    @length = 35
+    @length = 37
     @stdout = "Hello Raisa, I am salama"
     check
   end

test/compiler/fragments/test_if.rb

@@ -31,7 +31,7 @@ class Object
   end
 end
 HERE
-  @length = 45
+  @length = 47
   @stdout = "10"
   check
   end
@@ -53,7 +53,7 @@ class Object
   end
 end
 HERE
-  @length = 57
+  @length = 61
   @stdout = "else"
   check
   end

test/compiler/fragments/test_putint.rb

@@ -16,7 +16,7 @@ class Object
   end
 end
 HERE
-    @length = 30
+    @length = 32
     check
   end
 end

test/compiler/fragments/test_recursive_fibo.rb

@@ -27,7 +27,7 @@ class Object
   end
 end
 HERE
-  @length = 71
+  @length = 77
   check
   end
 end

test/compiler/statements/test_assign.rb

@@ -55,7 +55,7 @@ class Object
 end
 HERE
   @expect =  [Label, SaveReturn,GetSlot,GetSlot,SetSlot, LoadConstant,SetSlot,
-                  RegisterTransfer,FunctionCall,GetSlot,GetSlot,SetSlot ,
+                  LoadConstant,SetSlot,RegisterTransfer,FunctionCall,GetSlot,GetSlot,SetSlot ,
                   Label,RegisterTransfer,GetSlot,FunctionReturn]
   check
   end

test/compiler/statements/test_call.rb

@@ -18,7 +18,7 @@ class Object
 end
 HERE
     @expect =  [Label, SaveReturn,GetSlot,LoadConstant,
-                  SetSlot,LoadConstant,SetSlot,RegisterTransfer,FunctionCall,GetSlot ,
+                  SetSlot,LoadConstant,SetSlot,LoadConstant,SetSlot,RegisterTransfer,FunctionCall,GetSlot ,
                   Label,RegisterTransfer,GetSlot,FunctionReturn]
     check
   end
@@ -38,7 +38,7 @@ class Object
 end
 HERE
     @expect =  [Label, SaveReturn,GetSlot,LoadConstant,
-                  SetSlot,LoadConstant,SetSlot,RegisterTransfer,FunctionCall,GetSlot ,
+                  SetSlot,LoadConstant,SetSlot,LoadConstant,SetSlot,RegisterTransfer,FunctionCall,GetSlot ,
                   Label,RegisterTransfer,GetSlot,FunctionReturn]
     check
   end
@@ -58,7 +58,7 @@ class Object
 end
 HERE
     @expect =  [ Label, SaveReturn,LoadConstant,GetSlot,SetSlot,GetSlot,
-                  GetSlot,GetSlot,SetSlot,LoadConstant,SetSlot,RegisterTransfer,FunctionCall,
+                  GetSlot,GetSlot,SetSlot,LoadConstant,SetSlot,LoadConstant,SetSlot,RegisterTransfer,FunctionCall,
                   GetSlot ,Label,RegisterTransfer,GetSlot,FunctionReturn]
   check
   end
@@ -78,7 +78,7 @@ class Object
 end
 HERE
     @expect =  [ Label, SaveReturn,GetSlot,GetSlot,GetSlot,SetSlot,
-                  LoadConstant,SetSlot,RegisterTransfer,FunctionCall,
+                  LoadConstant,SetSlot,LoadConstant,SetSlot,RegisterTransfer,FunctionCall,
                   GetSlot ,Label,RegisterTransfer,GetSlot,FunctionReturn]
   check
   end
@@ -95,12 +95,12 @@ end
 end
 HERE
     @expect = [ Label, SaveReturn , GetSlot,GetSlot,SetSlot,LoadConstant,SetSlot,LoadConstant,
-                SetSlot,RegisterTransfer,FunctionCall,GetSlot,
+                SetSlot,LoadConstant,SetSlot,RegisterTransfer,FunctionCall,GetSlot,
                 Label,RegisterTransfer,GetSlot,FunctionReturn]
     was = check
     set = was.next(8)
     assert_equal SetSlot , set.class
-    assert_equal 10, set.index , "Set to message must be offset, not #{set.index}"
+    assert_equal 9, set.index , "Set to message must be offset, not #{set.index}"
   end
 end
 end

test/compiler/statements/test_class.rb

@@ -34,7 +34,7 @@ class Object
   end
 end
 HERE
-    @expect =  [Label, SaveReturn,GetSlot,LoadConstant,SetSlot,LoadConstant,SetSlot,
+    @expect =  [Label, SaveReturn,GetSlot,LoadConstant,SetSlot,LoadConstant,SetSlot,LoadConstant,SetSlot,
                 RegisterTransfer,FunctionCall,GetSlot,Label,RegisterTransfer,GetSlot,FunctionReturn]
     check
   end

test/compiler/statements/test_return.rb

@@ -66,7 +66,8 @@ class Object
 end
 HERE
   @expect =  [Label, SaveReturn,GetSlot,GetSlot,SetSlot, LoadConstant,
-                SetSlot,RegisterTransfer,FunctionCall,GetSlot ,Label,RegisterTransfer,GetSlot,FunctionReturn]
+                SetSlot,LoadConstant,SetSlot,RegisterTransfer,FunctionCall,GetSlot ,Label,
+                RegisterTransfer,GetSlot,FunctionReturn]
   check
   end
 end