compiler-the-translators/tests/sprint4/test/sp4_cg_less_than.alpha

(* TEST: [-asc -tc -cg -ir] *)

#include "std.alpha"

entry (arg) := {
    [Boolean: b; integer: x; integer: y]

    x := 1;
	y := 2;
	b := x < y;
    
    return 1;
}