79 lines
1.9 KiB
Ruby
79 lines
1.9 KiB
Ruby
# A Method (at runtime , sis in Parfait) is static object that primarily holds the executable
|
|
# code.
|
|
|
|
# For reflection also holds arguments and such
|
|
|
|
#
|
|
|
|
module Parfait
|
|
|
|
# static description of a method
|
|
# name
|
|
# arg_names
|
|
# known local variable names
|
|
# temp variables (numbered)
|
|
# executable code
|
|
|
|
# ps, the compiler injects its own info, see virtual::compiled_method_info
|
|
|
|
|
|
class Method < Object
|
|
|
|
def initialize clazz , name , arg_names
|
|
super()
|
|
raise "No class #{name}" unless clazz
|
|
@for_class = clazz
|
|
@name = name
|
|
@code = BinaryCode.new_object name
|
|
@arg_names = arg_names
|
|
@locals = List.new
|
|
@tmps = List.new
|
|
end
|
|
attr_reader :name , :arg_names , :for_class , :code , :locals , :tmps
|
|
|
|
|
|
# determine whether this method has a variable by the given name
|
|
# variables are locals and and arguments
|
|
# used to determine if a send must be issued
|
|
# return index of the name into the message if so
|
|
def has_var name
|
|
raise "uups #{name}.#{name.class}" unless name.is_a? Symbol
|
|
index = has_arg(name)
|
|
return index if index
|
|
has_local(name)
|
|
end
|
|
|
|
# determine whether this method has an argument by the name
|
|
def has_arg name
|
|
raise "uups #{name}.#{name.class}" unless name.is_a? Symbol
|
|
@arg_names.index_of name
|
|
end
|
|
|
|
# determine if method has a local variable or tmp (anonymous local) by given name
|
|
def has_local name
|
|
raise "uups #{name}.#{name.class}" unless name.is_a? Symbol
|
|
index = @locals.index_of(name)
|
|
index = @tmps.index_of(name) unless index
|
|
index
|
|
end
|
|
|
|
def ensure_local name
|
|
index = has_local name
|
|
return index if index
|
|
@locals.push name
|
|
@locals.get_length
|
|
end
|
|
|
|
def get_var name
|
|
var = has_var name
|
|
raise "no var #{name} in method #{self.name} , #{@locals} #{@arg_names}" unless var
|
|
var
|
|
end
|
|
|
|
def sof_reference_name
|
|
@name
|
|
end
|
|
|
|
end
|
|
end
|