diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2010-11-18 23:00:31 +0200 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2010-11-18 23:00:31 +0200 |
commit | 6f3612539c425da2bc1d34db621696e6a273b01c (patch) | |
tree | 9623b3ac2c54a93e5eed3be2b1dda7f4e4bf0e47 /test/aadelete1.awk | |
parent | 4e3701015635401df2fc4da58abaab7645f4ebd3 (diff) | |
download | egawk-6f3612539c425da2bc1d34db621696e6a273b01c.tar.gz egawk-6f3612539c425da2bc1d34db621696e6a273b01c.tar.bz2 egawk-6f3612539c425da2bc1d34db621696e6a273b01c.zip |
Bring latest byte code gawk into git. Hurray!
Diffstat (limited to 'test/aadelete1.awk')
-rw-r--r-- | test/aadelete1.awk | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/test/aadelete1.awk b/test/aadelete1.awk new file mode 100644 index 00000000..2484a057 --- /dev/null +++ b/test/aadelete1.awk @@ -0,0 +1,19 @@ +BEGIN { + a[1][1] = 11 + a[1][2] = 12 + a[2] = 2 + delete a[1][1] + f(a, a[1]) + print a[1][1] + print length(a), length(a[1]) + delete a + print length(a), length(a[1]), length(a) + a[1][1] = 11 +} + +function f(c, b) { + delete b + b[1] = 1 + print c[1][1], b[1] + delete c[2] +} |