qse/ase/cmd/awk/simple-001.awk
2008-03-21 03:49:53 +00:00

19 lines
282 B
Awk

function error() { exit (200); }
function getx()
{
if (x == 2) error();
return x++;
}
function gety() { return y++; }
BEGIN {
x = 0;
y = 0;
print getx() + gety();
print getx() + gety();
print getx() + gety();
print getx() + gety();
}