41 lines
1.3 KiB
Ruby
41 lines
1.3 KiB
Ruby
require_relative "compile_helper"
|
|
|
|
module Register
|
|
module Builtin
|
|
class Object
|
|
module ClassMethods
|
|
include CompileHelper
|
|
|
|
# self[index] basically. Index is the first arg
|
|
# return is stored in return_value
|
|
# (this method returns a new method off course, like all builtin)
|
|
def get_internal_word context
|
|
compiler = compiler_for(:Object , :get_internal_word )
|
|
source = "get_internal_word"
|
|
me , index = self_and_int_arg(compiler,source)
|
|
# reduce me to me[index]
|
|
compiler.add_code SlotToReg.new( source , me , index , me)
|
|
# and put it back into the return value
|
|
compiler.add_code Register.reg_to_slot( source , me , :message , :return_value)
|
|
return compiler.method
|
|
end
|
|
|
|
# self[index] = val basically. Index is the first arg , value the second
|
|
# no return
|
|
def set_internal_word context
|
|
compiler = compiler_for(:Object , :set_internal_word , {:value => :Object} )
|
|
source = "set_internal_word"
|
|
me , index = self_and_int_arg(compiler,source)
|
|
value = load_arg_at(compiler,source , 2)
|
|
|
|
# do the set
|
|
compiler.add_code RegToSlot.new( source , value , me , index)
|
|
return compiler.method
|
|
end
|
|
|
|
end
|
|
extend ClassMethods
|
|
end
|
|
end
|
|
end
|