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

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

type main: string -> integer
function entry: main
	
entry (arg) := {
	[integer:x; integer:y]
	y := 1;
	x := 3;
	y := x + y;
	return y;
}