552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
|
# File 'lib/duby/old/compiler_old.rb', line 552
def compile(builder)
else_lbl = builder.label
done = builder.label
condition = self.condition
condition = condition.next_node while NewlineNode === condition
case condition
when CallNode
args = condition.args_node
receiver_type = condition.receiver_node.type(builder)
if receiver_type.primitive?
case condition.name
when "<"
raise CompileError.new(position, "Primitive < must have exactly one argument") if !args || args.size != 1
condition.receiver_node.compile(builder)
args.get(0).compile(builder)
case receiver_type
when Jint
builder.if_icmpge(else_lbl)
else
raise CompileError.new(position, "Primitive < is only supported for int")
end
when ">"
raise CompileError.new(position, "Primitive > must have exactly one argument") if !args || args.size != 1
condition.receiver_node.compile(builder)
args.get(0).compile(builder)
case receiver_type
when Jint
builder.if_icmple(else_lbl)
else
raise CompileError.new(position, "Primitive > is only supported for int")
end
when "=="
raise CompileError.new(position, "Primitive == must have exactly one argument") if !args || args.size != 1
condition.receiver_node.compile(builder)
args.get(0).compile(builder)
case receiver_type
when Jint
builder.if_icmpne(else_lbl)
else
raise CompileError.new(position, "Primitive == is only supported for int")
end
else
raise CompileError.new(position, "Conditional not supported: #{condition.inspect}")
end
then_body.compile(builder)
builder.goto(done)
else_lbl.set!
else_body.compile(builder)
done.set!
else
raise CompileError.new(position, "Conditional on non-primitives not supported: #{condition.inspect}")
end
else
raise CompileError.new(position, "Non-call conditional not supported: #{condition.inspect}")
end
end
|