ruby-x/rubyx
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

create a reduce_int on RegisterSlot

Browse Source 
that just passes through to RegisterValue by calling to_reg
This commit is contained in:
Torsten
2020-03-11 22:54:20 +02:00
parent 17a1121408
commit 2656bfacb2
7 changed files with 15 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
lib/slot_machine/macro/comparison.rb
View File

@ -17,8 +17,8 @@ module SlotMachine
merge_label = Risc.label("merge" , "merge_label_#{object_id}")
result = Risc::RegisterValue.new(:result , :Object)
builder.build do
left = message[:receiver].to_reg.reduce_int(false) #false == hack
right = message[:arg1].to_reg.reduce_int(false)
left = message[:receiver].reduce_int(false) #false == hack
right = message[:arg1].reduce_int(false)
if(operator.to_s.start_with?('<') )
right.op :- , left

2
lib/slot_machine/macro/div10.rb
View File

@ -8,7 +8,7 @@ module SlotMachine
integer_reg = builder.register( :integer_reg )
integer_const = builder.register( :integer_const )
builder.build do
integer_self = message[:receiver].to_reg.reduce_int(false)
integer_self = message[:receiver].reduce_int(false)
transfer( integer_self , integer_1)
transfer( integer_self , integer_reg)

2
lib/slot_machine/macro/div4.rb
View File

@ -6,7 +6,7 @@ module SlotMachine
integer_1 = builder.register( :integer_1 )
integer_self = builder.register( :integer_self )
builder.build do
integer_self = message[:receiver].to_reg.reduce_int(false)
integer_self = message[:receiver].reduce_int(false)
load_object( 2 , integer_1)
integer_self.op :>> , integer_1
integer_tmp[Parfait::Integer.integer_index] << integer_self

2
lib/slot_machine/macro/get_internal_byte.rb
View File

@ -5,7 +5,7 @@ module SlotMachine
integer_tmp = builder.allocate_int
builder.build do
object = message[:receiver].to_reg
integer = message[:arg1].to_reg.reduce_int(false)
integer = message[:arg1].reduce_int(false)
object <= object[integer]
integer_tmp[Parfait::Integer.integer_index] << object
message[:return_value] << integer_tmp

2
lib/slot_machine/macro/get_internal_word.rb
View File

@ -2,7 +2,7 @@ module SlotMachine
class GetInternalWord < Macro
def to_risc(compiler)
compiler.builder(compiler.source).build do
integer = message[:arg1].to_reg.reduce_int(false)
integer = message[:arg1].reduce_int(false)
message[:return_value] << message[:receiver][integer]
end
end

4
lib/slot_machine/macro/operator.rb
View File

@ -11,8 +11,8 @@ module SlotMachine
integer_tmp = builder.allocate_int
operator = @operator # make accessible in block
builder.build do
integer = message[:receiver].to_reg.reduce_int(false)
integer_reg = message[:arg1].to_reg.reduce_int(false)
integer = message[:receiver].reduce_int(false)
integer_reg = message[:arg1].reduce_int(false)
integer.op operator , integer_reg
integer_tmp[Parfait::Integer.integer_index] << integer
message[:return_value] << integer_tmp