Torsten Rüger
c1679bd6ff
slots used to ba an array of symbols Now we have an object for each slot, that holds the name and the next_slot relatively easy change, though quite broad
39 lines
1.0 KiB
Ruby
39 lines
1.0 KiB
Ruby
module SlotMachine
|
|
class SlottedConstant < Slotted
|
|
|
|
attr_reader :known_object
|
|
|
|
def initialize( object , slots)
|
|
super(slots)
|
|
@known_object = object
|
|
raise "Not known #{slots}" unless object
|
|
end
|
|
|
|
def known_name
|
|
known_object.class.short_name
|
|
end
|
|
|
|
# load the slots into a register
|
|
# the code is added to compiler
|
|
# the register returned
|
|
def to_register(compiler, source)
|
|
if known_object.respond_to?(:ct_type)
|
|
type = known_object.ct_type
|
|
else
|
|
type = :Object
|
|
end
|
|
right = compiler.use_reg( type )
|
|
parfait = known_object.to_parfait(compiler)
|
|
const = Risc.load_constant(source, parfait , right)
|
|
compiler.add_code const
|
|
if slots_length == 2
|
|
raise "only type allowed for constants, not #{slots}" unless slots.name == :type
|
|
compiler.add_code Risc::SlotToReg.new( source , right , Parfait::TYPE_INDEX, right)
|
|
end
|
|
raise "Can't have slots into Constants #{slots}" if slots_length > 2
|
|
return const.register
|
|
end
|
|
|
|
end
|
|
end
|