remove method source receiver
no harm done it seems
This commit is contained in:
parent
e75517ff05
commit
72b790c107
@ -32,7 +32,6 @@ module Register
|
|||||||
|
|
||||||
def putint context
|
def putint context
|
||||||
putint_function = MethodSource.create_method(:Integer,:putint , [] )
|
putint_function = MethodSource.create_method(:Integer,:putint , [] )
|
||||||
putint_function.source.receiver = :Integer
|
|
||||||
return putint_function
|
return putint_function
|
||||||
# buffer = Parfait::Word.new(" ") # create a buffer
|
# buffer = Parfait::Word.new(" ") # create a buffer
|
||||||
# context.object_space.add_object buffer # and save it (function local variable: a no no)
|
# context.object_space.add_object buffer # and save it (function local variable: a no no)
|
||||||
@ -60,7 +59,6 @@ module Register
|
|||||||
# not my hand off course, found in the net http://www.peter-cockerell.net/aalp/html/ch-5.html
|
# not my hand off course, found in the net http://www.peter-cockerell.net/aalp/html/ch-5.html
|
||||||
def fibo context
|
def fibo context
|
||||||
fibo_function = MethodSource.create_method(:Integer,:fibo , [] )
|
fibo_function = MethodSource.create_method(:Integer,:fibo , [] )
|
||||||
fibo_function.source.receiver = :Integer
|
|
||||||
return fibo_function
|
return fibo_function
|
||||||
# int = fibo_function.receiver
|
# int = fibo_function.receiver
|
||||||
#
|
#
|
||||||
|
@ -56,7 +56,7 @@ module Register
|
|||||||
add_code FunctionReturn.new( self , Register.new_message_reg , Register.resolve_index(:message , :return_address) )
|
add_code FunctionReturn.new( self , Register.new_message_reg , Register.resolve_index(:message , :return_address) )
|
||||||
@current = enter
|
@current = enter
|
||||||
end
|
end
|
||||||
attr_accessor :current , :receiver , :instructions
|
attr_accessor :current , :instructions
|
||||||
|
|
||||||
# add an instruction after the current (insertion point)
|
# add an instruction after the current (insertion point)
|
||||||
# the added instruction will become the new insertion point
|
# the added instruction will become the new insertion point
|
||||||
|
@ -33,7 +33,6 @@ module Soml
|
|||||||
@method = Register::MethodSource.create_method_for(@clazz, name , args )
|
@method = Register::MethodSource.create_method_for(@clazz, name , args )
|
||||||
@clazz.add_instance_method @method
|
@clazz.add_instance_method @method
|
||||||
end
|
end
|
||||||
@method.source.receiver = r
|
|
||||||
#puts "compile method #{@method.name}"
|
#puts "compile method #{@method.name}"
|
||||||
|
|
||||||
kids.to_a.each do |ex|
|
kids.to_a.each do |ex|
|
||||||
|
Loading…
x
Reference in New Issue
Block a user