27 lines
731 B
Ruby
27 lines
731 B
Ruby
module Mom
|
|
module Builtin
|
|
class GetInternalWord < ::Mom::Instruction
|
|
def to_risc(compiler)
|
|
compiler.builder(compiler.source).build do
|
|
object! << message[:receiver]
|
|
integer! << message[:arg1] #"at" is at index 0
|
|
integer.reduce_int
|
|
object << object[integer]
|
|
message[:return_value] << object
|
|
end
|
|
end
|
|
end
|
|
end
|
|
class GetInternalWord < Instruction
|
|
def to_risc(compiler)
|
|
compiler.builder(compiler.source).build do
|
|
object! << message[:receiver]
|
|
integer! << message[:arg1] #"at" is at index 0
|
|
integer.reduce_int
|
|
object << object[integer]
|
|
message[:return_value] << object
|
|
end
|
|
end
|
|
end
|
|
end
|