Files
compiler-the-translators/tests/sprint3/test/sp3_multiple_args.alpha~

17 lines
248 B
Plaintext

type rec: [character: x; integer: y]
type T2: rec -> integer
type main: string -> integer
function entry: main
function bar: T2
bar2 (r,s) := {
return s;
}
entry (arg) := {
[ integer: result ; rec: w]
result := bar('c', 7);
return 0;
}