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_attributes [] 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