qse/ase/test/awk/t4.awk

22 lines
237 B
Awk
Raw Normal View History

2007-01-23 14:23:18 +00:00
function main (arg1, arg2, arg3)
2006-04-30 17:12:51 +00:00
{
2006-09-02 14:59:15 +00:00
local i, k, c;
2006-04-30 17:12:51 +00:00
for (i = 0; i < 10; i++)
{
abc[i*2] = i;
}
2006-09-02 14:59:15 +00:00
k = 20;
2006-04-30 17:12:51 +00:00
for (i = 0; i < 100; i++)
{
if (i in abc) j[i] = i;
}
2006-11-19 15:24:21 +00:00
2007-01-23 14:23:18 +00:00
print arg1;
print arg2;
print arg3;
2006-11-19 15:24:21 +00:00
print "end of program";
2006-04-30 17:12:51 +00:00
}