diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2016-08-14 21:12:45 +0300 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2016-08-14 21:12:45 +0300 |
commit | 0bdf798b8f9d018b4d11f63dddde683248d65a39 (patch) | |
tree | 9247911e64755b056f9b91c93c9c7ea9e5357f77 /test/intarray.awk | |
parent | f591d307d9af95bfa0ccda4d5eb76a674447ba39 (diff) | |
parent | 0703039505200ca5126e11d905a6fa40c602d1b9 (diff) | |
download | egawk-0bdf798b8f9d018b4d11f63dddde683248d65a39.tar.gz egawk-0bdf798b8f9d018b4d11f63dddde683248d65a39.tar.bz2 egawk-0bdf798b8f9d018b4d11f63dddde683248d65a39.zip |
Merge branch 'master' into feature/typed-regex
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] + } } } |