diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2016-08-14 16:55:56 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2016-08-14 16:55:56 +0300 |
| commit | feb11c09caa22207cbf53bf7cfcdeca42d661b8b (patch) | |
| tree | 4d660705dc659d48a858a35e9fd367d5c93a32a9 /test/intarray.awk | |
| parent | 5ce09ba3867f5c9d3c3dc0c00c155c0ba0c224f6 (diff) | |
| download | egawk-feb11c09caa22207cbf53bf7cfcdeca42d661b8b.tar.gz egawk-feb11c09caa22207cbf53bf7cfcdeca42d661b8b.tar.bz2 egawk-feb11c09caa22207cbf53bf7cfcdeca42d661b8b.zip | |
Update intarray test and ok files.
Diffstat (limited to 'test/intarray.awk')
| -rw-r--r-- | test/intarray.awk | 15 |
1 files changed, 12 insertions, 3 deletions
diff --git a/test/intarray.awk b/test/intarray.awk index 2c30bd5f..8785ea9e 100644 --- a/test/intarray.awk +++ b/test/intarray.awk @@ -1,10 +1,19 @@ BEGIN { - nf = split("5 |05|0x4|00| 5|-0x12| 011|-013", f, "|") + nf = split("5 |05|0x4|00| 5|-0x12| 011|-013|1.0|5.1e1|-5|-05|+2", f, "|") for (i = 1; i <= nf; i++) { delete g + g[f[i]] + for (x in g) { + if (x"" != f[i]"") + printf "Error in string test: [%s] != [%s]\n", x, f[i] + } + + delete g z = f[i]+0 # trigger numeric conversion g[f[i]] - for (x in g) - printf "[%s]\n", x + for (x in g) { + if (x"" != f[i]"") + printf "Error in strnum test: [%s] != [%s]\n", x, f[i] + } } } |