small meta related changes
This commit is contained in:
parent
42c404802d
commit
fd7e4afb2f
@ -38,10 +38,10 @@ module Soml
|
|||||||
def do_call clazz , statement
|
def do_call clazz , statement
|
||||||
name = statement.first.first
|
name = statement.first.first
|
||||||
#puts "clazz #{clazz.name}"
|
#puts "clazz #{clazz.name}"
|
||||||
raise "No such class #{me.type}" unless clazz
|
raise "No such class" unless clazz
|
||||||
method = clazz.get_instance_method(name)
|
method = clazz.get_instance_method(name)
|
||||||
#puts Register.machine.space.get_class_by_name(:Integer).method_names.to_a
|
#puts Register.machine.space.get_class_by_name(:Integer).method_names.to_a
|
||||||
raise "Method not implemented #{me.type}.#{name}" unless method
|
raise "Method not implemented #{clazz.name}.#{name}" unless method
|
||||||
Register.issue_call( self , method )
|
Register.issue_call( self , method )
|
||||||
end
|
end
|
||||||
def set_message_details name_s , arguments
|
def set_message_details name_s , arguments
|
||||||
|
@ -21,8 +21,6 @@ module Soml
|
|||||||
raise "Not covered #{receiver}"
|
raise "Not covered #{receiver}"
|
||||||
end
|
end
|
||||||
end
|
end
|
||||||
r = @clazz
|
|
||||||
class_name = @clazz.name
|
|
||||||
|
|
||||||
@method = @clazz.get_instance_method( name )
|
@method = @clazz.get_instance_method( name )
|
||||||
if(@method)
|
if(@method)
|
||||||
@ -31,7 +29,6 @@ module Soml
|
|||||||
init_method
|
init_method
|
||||||
else
|
else
|
||||||
create_method_for(@clazz, name , args ).init_method
|
create_method_for(@clazz, name , args ).init_method
|
||||||
@clazz.add_instance_method @method
|
|
||||||
end
|
end
|
||||||
@method.source = statement
|
@method.source = statement
|
||||||
#puts "compile method #{@method.name}"
|
#puts "compile method #{@method.name}"
|
||||||
|
Loading…
x
Reference in New Issue
Block a user