Torsten Rüger
3c762c4fe7
And the derived XXDefinitions to XXSlot Just to be more consistent And possibly free the Definition for the Language side
39 lines
1.0 KiB
Ruby
39 lines
1.0 KiB
Ruby
module Risc
|
|
# load a constant into a register
|
|
#
|
|
# first is the actual constant, either immediate register or object reference (from the space)
|
|
# second argument is the register the constant is loaded into
|
|
|
|
class LoadConstant < Instruction
|
|
def initialize( source , constant , register)
|
|
super(source)
|
|
@register = register
|
|
@constant = constant
|
|
raise "Not Constant #{constant}" if constant.is_a?(SlotMachine::Slot)
|
|
raise "Not register #{register}" unless RegisterValue.look_like_reg(register)
|
|
end
|
|
attr_accessor :register , :constant
|
|
|
|
def to_s
|
|
class_source "#{register} <- #{constant_str}"
|
|
end
|
|
|
|
private
|
|
def constant_str
|
|
case @constant
|
|
when String , Symbol
|
|
@constant.to_s
|
|
else
|
|
if( @constant.respond_to? :rxf_reference_name )
|
|
constant.rxf_reference_name
|
|
else
|
|
constant.class.name.to_s
|
|
end
|
|
end
|
|
end
|
|
end
|
|
def self.load_constant( source , constant , register )
|
|
LoadConstant.new( source , constant , register )
|
|
end
|
|
end
|