rubyx/lib/risc/instructions/label.rb

77 lines
2.2 KiB
Ruby

module Risc
# A label is a placeholder for it's next Instruction
# It's function is not to turn into code, but to be a valid branch target
# Labels have the same position as their next instruction (See positioning code)
#
# So branches and Labels are pairs, fan out, fan in
#
# For a return, the address (position) of the label has to be loaded.
# So a Label carries the ReturnAddress constant that holds the address (it's own
# position, again see positioning code).
# But currently the label is used in the Risc abstraction layer, and in the
# arm/interpreter layer. The integer is only used in the lower layer, but needs
# to be created (and positioned)
class Label < Instruction
# See class description. also factory method Risc.label below
def initialize( source , name , addr , nekst = nil)
super(source , nekst)
@name = name
@address = addr
raise "Not address #{addr}" unless addr.is_a?(Parfait::ReturnAddress)
end
attr_reader :name , :address
# return an array of names of registers that is used by the instruction
def register_names
[]
end
def to_cpu(translator)
@cpu_label ||= super
end
def to_s
class_source "#{@name} (next: #{self.next.class.name.split("::").last})"
end
def rxf_reference_name
@name
end
# a method start has a label of the form Class.method , test for that
def is_method
@name.split(".").length == 2
end
def assemble_all( io )
self.each {|ins| ins.assemble(io)}
end
def assemble io
end
def total_byte_length
ret = 0
self.each{|ins| ret += ins.byte_length}
ret
end
# shame we need this, just for logging
def byte_length
0
end
alias :padded_length :byte_length
end
# Labels carry what is esentially an integer constant
# The int holds the labels position for use at runtime (return address)
# An integer is plucked from object_space abd added to the machine constant pool
# if none was given
def self.label( source , name , position = nil , nekst = nil)
position = Parfait.object_space.get_next_for(:ReturnAddress) unless position
Label.new( source , name , position, nekst )
end
end