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

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

#include "std.alpha"

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

    x := 4;
    y := 20;
    y := y % x;
    
    result := printInteger(y);
    return y;
}