xref: /illumos-gate/usr/src/test/util-tests/tests/awk/syn/arrayparm.awk (revision 5328fc53d11d7151861fa272e4fb0248b8f0e145)
1#
2# Test program from:
3#
4# Date: Tue, 21 Feb 95 16:09:29 EST
5# From: emory!blackhawk.com!aaron (Aaron Sosnick)
6#
7BEGIN {
8    foo[1]=1;
9    foo[2]=2;
10    bug1(foo);
11}
12function bug1(i) {
13    for (i in foo) {
14	bug2(i);
15	delete foo[i];
16	print i,1,bot[1];
17    }
18}
19function bug2(arg) {
20    bot[arg]=arg;
21}
22