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

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

#include "std.alpha"

entry (arg) := {
    [integer:x; integer:y; integer: result]
    
    y := 1;
    x := 3;
    y := x - y;
    
    result := printInteger(y);
    return y;
}