Torsten Rüger
d751c53d1d
SameCheck is very similar to NotSameCheck, but only used from the language Label was named jump, fixed that
37 lines
1.0 KiB
Ruby
37 lines
1.0 KiB
Ruby
module SlotMachine
|
|
|
|
# The funny thing about the ruby truth is that it is anything but false or nil
|
|
#
|
|
# To implement the normal ruby logic, we check for false or nil and jump
|
|
# to the false branch. true_block follows implicitly
|
|
#
|
|
class TruthCheck < Check
|
|
attr_reader :condition
|
|
|
|
def initialize(condition , false_label)
|
|
super(false_label)
|
|
@condition = condition
|
|
raise "condition must be slot_definition #{condition}" unless condition.is_a?(Slotted)
|
|
end
|
|
|
|
def to_s
|
|
"TruthCheck #{@condition} -> #{false_label}"
|
|
end
|
|
|
|
def to_risc(compiler)
|
|
false_label = @false_label.risc_label(compiler)
|
|
builder = compiler.builder("TruthCheck")
|
|
condition_reg = @condition.to_register(compiler,self)
|
|
builder.build do
|
|
object! << Parfait.object_space.false_object
|
|
object.op :- , condition_reg
|
|
if_zero false_label
|
|
object << Parfait.object_space.nil_object
|
|
object.op :- , condition_reg
|
|
if_zero false_label
|
|
end
|
|
end
|
|
|
|
end
|
|
end
|