Fix set_internal_byte registers

This commit is contained in:
2020-03-11 22:54:44 +02:00
parent 2656bfacb2
commit d125a1528a
2 changed files with 16 additions and 19 deletions

View File

@ -2,13 +2,9 @@ module SlotMachine
class SetInternalByte < Macro
def to_risc(compiler)
compiler.builder(compiler.source).build do
word! << message[:receiver]
integer_reg! << message[:arg2] #VALUE
message[:return_value] << integer_reg
integer! << message[:arg1] #"index"
integer.reduce_int
integer_reg.reduce_int
word[integer] <= integer_reg
message[:return_value] << message[:arg2]
integer = message[:arg1].reduce_int(false)
message[:receiver][integer] <= message[:arg2].reduce_int(false)
end
return compiler
end