change args argument to create method to be hash

was array and didn’t carry types and names

lib/register/builtin/integer.rb

@@ -30,65 +30,15 @@ module Register
         #   # return utoa_function
         # end
 
-        def putint context
-          compiler = Soml::Compiler.new.create_method(:Integer,:putint , [] ).init_method
+        def mod context
+          compiler = Soml::Compiler.new.create_method(:Integer,:mod , {:Integer => :by} ).init_method
+          return compiler.method
+        end
+        def putint context
+          compiler = Soml::Compiler.new.create_method(:Integer,:putint ).init_method
           return compiler.method
-          # buffer = Parfait::Word.new("           ") # create a buffer
-          # context.object_space.add_object buffer              # and save it (function local variable: a no no)
-          # int = putint_function.receiver
-          # moved_int = putint_function.new_local
-          # utoa = context.object_space.get_class_by_name(:Object).resolve_method(:utoa)
-          # putint_function.instance_eval do
-          #   mov( moved_int ,  int )     # move arg up
-          #   add( int ,  buffer ,nil )   # string to write to (add string address to pc)
-          #   add( int , int ,  buffer.length - 3) # 3 for good measure , ahem.
-          #   call( utoa )
-          #   after = new_block("after_call")
-          #   insert_at after
-          #   # And now we "just" have to print it, using the write_stdout
-          #   add( int ,  buffer , nil )   # string to write to
-          #   mov( moved_int ,  buffer.length )
-          # end
-          # RegisterMachine.instance.write_stdout(putint_function)
-          # putint_function
         end
 
-        # testing method, hand coded fibo, expects arg in receiver_register
-        # result comes in return_register
-        # a hand coded version of the fibonachi numbers
-        # not my hand off course, found in the net http://www.peter-cockerell.net/aalp/html/ch-5.html
-        def fibo context
-          compiler = Soml::Compiler.new.create_method(:Integer,:fibo ,  [] ).init_method
-          return compiler.method
-          # int = fibo_function.receiver
-          #
-          # last = fibo_function.new_block("return")
-          #
-          # f1 = fibo_function.new_local
-          # f2 = fibo_function.new_local
-          #
-          # fibo_function.instance_eval do
-          #   cmp  int , 1
-          #   mov( result, int , condition_code: :le)
-          #   ble( last ) #branch to return, rather than return (as the original)
-          #   mov f1 , 1        #set up initial values
-          #   mov f2 , 0
-          # end
-          #
-          # loop = fibo_function.new_block("loop")
-          # fibo_function.insert_at loop
-          #
-          # fibo_function.instance_eval do #loop through
-          #   add f1 , f1 , f2             # f1 = f1 + f2
-          #   sub f2 , f1 , f2             # f2 = f1 -f2
-          #   sub int ,  int , 1  # todo: set.. should do below cmp, but doesn't , set_update_status: 1
-          #   cmp int , 1
-          #   bne( loop )
-          #   mov( result , f1 )
-          # end
-          #
-          # fibo_function
-        end
       end
       extend ClassMethods
     end