diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2012-10-05 12:56:31 +0200 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2012-10-05 12:56:31 +0200 |
| commit | bcb0224f8f2d19cd03a2527eec2f5eb42abef7cd (patch) | |
| tree | 674e7412188b1c7fb6decd02575e70f0d74247b6 /test/symtab1.awk | |
| parent | 5caf2424094016b9a26c5d9d74b25cab39671478 (diff) | |
| parent | 81896b422307105edb9908958bbedd09967d9a05 (diff) | |
| download | egawk-bcb0224f8f2d19cd03a2527eec2f5eb42abef7cd.tar.gz egawk-bcb0224f8f2d19cd03a2527eec2f5eb42abef7cd.tar.bz2 egawk-bcb0224f8f2d19cd03a2527eec2f5eb42abef7cd.zip | |
Merge branch 'symtab'
Diffstat (limited to 'test/symtab1.awk')
| -rw-r--r-- | test/symtab1.awk | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/test/symtab1.awk b/test/symtab1.awk new file mode 100644 index 00000000..6ca7d632 --- /dev/null +++ b/test/symtab1.awk @@ -0,0 +1,18 @@ +function dumparray(name, array, i) +{ + for (i in array) + if (isarray(array[i])) + dumparray(name "[" i "]", array[i]) + else + printf("%s[%s] = %s\n", name, i, array[i]) +} + +BEGIN { + a[1] = 1 + a[2][1] = 21 + for (i in SYMTAB) + if (isarray(SYMTAB[i])) + dumparray(i, SYMTAB[i]) + else + printf("SYMTAB[\"%s\"] = \"%s\"\n", i, SYMTAB[i]) +} |