(* TEST: [-st] *)
type main: string -> integer
function entry: main

type rec: [integer: x; integer: y]
type T2: rec -> integer

entry(arg) := {
    [rec: w]
	
    w := reserve w;
	w.x := 1;
	w.y := 2;
	w := release w;
	
    return 0;    
}