2017-01-19 08:02:29 +01:00
|
|
|
module Risc
|
2014-10-03 10:07:18 +02:00
|
|
|
# load a constant into a register
|
|
|
|
#
|
2015-06-25 15:31:09 +02:00
|
|
|
# first is the actual constant, either immediate register or object reference (from the space)
|
|
|
|
# second argument is the register the constant is loaded into
|
2015-05-31 16:54:36 +02:00
|
|
|
|
2014-10-03 10:07:18 +02:00
|
|
|
class LoadConstant < Instruction
|
2015-07-27 11:13:39 +02:00
|
|
|
def initialize source , constant , register
|
|
|
|
super(source)
|
2015-06-25 15:31:09 +02:00
|
|
|
@register = register
|
2014-10-03 10:07:18 +02:00
|
|
|
@constant = constant
|
2018-03-21 22:08:06 +01:00
|
|
|
raise "Not Constant #{constant}" if constant.is_a?(Mom::SlotDefinition)
|
2018-04-05 11:22:40 +02:00
|
|
|
raise "Not register #{register}" unless RiscValue.look_like_reg(register)
|
2014-10-03 10:07:18 +02:00
|
|
|
end
|
2015-06-25 15:31:09 +02:00
|
|
|
attr_accessor :register , :constant
|
2015-07-24 12:23:56 +02:00
|
|
|
|
|
|
|
def to_s
|
2018-03-22 17:38:19 +01:00
|
|
|
class_source "#{register} <- #{constant_str}"
|
2015-07-24 12:23:56 +02:00
|
|
|
end
|
|
|
|
|
2015-08-08 23:52:47 +02:00
|
|
|
private
|
|
|
|
def constant_str
|
2015-11-21 13:17:54 +01:00
|
|
|
case @constant
|
2018-03-31 11:38:30 +02:00
|
|
|
when String , Symbol
|
2015-11-21 13:17:54 +01:00
|
|
|
@constant.to_s
|
|
|
|
else
|
|
|
|
if( @constant.respond_to? :sof_reference_name )
|
|
|
|
constant.sof_reference_name
|
2015-08-08 23:52:47 +02:00
|
|
|
else
|
2015-11-21 13:17:54 +01:00
|
|
|
constant.class.name.to_s
|
2015-08-08 23:52:47 +02:00
|
|
|
end
|
2015-11-21 13:17:54 +01:00
|
|
|
end
|
2015-08-08 23:52:47 +02:00
|
|
|
end
|
2014-10-03 10:07:18 +02:00
|
|
|
end
|
2016-12-28 17:31:29 +01:00
|
|
|
def self.load_constant( source , constant , register )
|
2015-11-21 13:17:54 +01:00
|
|
|
LoadConstant.new source , constant , register
|
|
|
|
end
|
2014-10-03 10:07:18 +02:00
|
|
|
end
|