diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2016-08-01 22:17:14 +0300 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2016-08-01 22:17:14 +0300 |
commit | 5da25619741b53c6f51dd86617f10591486477ae (patch) | |
tree | cb1d9243db4316dd05d41523043f0c0eaf9b43f3 /test | |
parent | 1b70e3c2fe5d26e5f3cc3cb74e74e91ee038ea70 (diff) | |
download | egawk-5da25619741b53c6f51dd86617f10591486477ae.tar.gz egawk-5da25619741b53c6f51dd86617f10591486477ae.tar.bz2 egawk-5da25619741b53c6f51dd86617f10591486477ae.zip |
New test for sorted for.
Diffstat (limited to 'test')
-rw-r--r-- | test/ChangeLog | 7 | ||||
-rw-r--r-- | test/Makefile.am | 5 | ||||
-rw-r--r-- | test/Makefile.in | 10 | ||||
-rw-r--r-- | test/Maketests | 5 | ||||
-rw-r--r-- | test/sortfor2.awk | 11 | ||||
-rw-r--r-- | test/sortfor2.in | 2 | ||||
-rw-r--r-- | test/sortfor2.ok | 2 |
7 files changed, 40 insertions, 2 deletions
diff --git a/test/ChangeLog b/test/ChangeLog index 22a514b5..89b5d177 100644 --- a/test/ChangeLog +++ b/test/ChangeLog @@ -1,3 +1,10 @@ +2016-08-01 Arnold D. Robbins <arnold@skeeve.com> + + * Makefile.am (sortfor2): New test. + * sortfor2.awk, sortfor2.in, sortfor2.ok: New files. + Thanks Christian Schneider <software@chschneider.eu> + for the report. + 2015-06-17 Arnold D. Robbins <arnold@skeeve.com> * Makefile.am (ofmtstrnum): New test. diff --git a/test/Makefile.am b/test/Makefile.am index 0bda377c..58b1057e 100644 --- a/test/Makefile.am +++ b/test/Makefile.am @@ -911,6 +911,9 @@ EXTRA_DIST = \ sortfor.awk \ sortfor.in \ sortfor.ok \ + sortfor2.awk \ + sortfor2.in \ + sortfor2.ok \ sortglos.awk \ sortglos.in \ sortglos.ok \ @@ -1123,7 +1126,7 @@ GAWK_EXT_TESTS = \ profile0 profile1 profile2 profile3 profile4 profile5 profile6 \ profile7 profile8 pty1 \ rebuf regnul1 regnul2 regx8bit reginttrad reint reint2 rsgetline rsglstdin rsstart1 \ - rsstart2 rsstart3 rstest6 shadow sortfor sortu split_after_fpat \ + rsstart2 rsstart3 rstest6 shadow sortfor sortfor2 sortu split_after_fpat \ splitarg4 strftime \ strtonum switch2 symtab1 symtab2 symtab3 symtab4 symtab5 symtab6 \ symtab7 symtab8 symtab9 symtab10 \ diff --git a/test/Makefile.in b/test/Makefile.in index ff1d8e07..b04ac7c2 100644 --- a/test/Makefile.in +++ b/test/Makefile.in @@ -1168,6 +1168,9 @@ EXTRA_DIST = \ sortfor.awk \ sortfor.in \ sortfor.ok \ + sortfor2.awk \ + sortfor2.in \ + sortfor2.ok \ sortglos.awk \ sortglos.in \ sortglos.ok \ @@ -1379,7 +1382,7 @@ GAWK_EXT_TESTS = \ profile0 profile1 profile2 profile3 profile4 profile5 profile6 \ profile7 profile8 pty1 \ rebuf regnul1 regnul2 regx8bit reginttrad reint reint2 rsgetline rsglstdin rsstart1 \ - rsstart2 rsstart3 rstest6 shadow sortfor sortu split_after_fpat \ + rsstart2 rsstart3 rstest6 shadow sortfor sortfor2 sortu split_after_fpat \ splitarg4 strftime \ strtonum switch2 symtab1 symtab2 symtab3 symtab4 symtab5 symtab6 \ symtab7 symtab8 symtab9 symtab10 \ @@ -3933,6 +3936,11 @@ sortfor: @AWKPATH="$(srcdir)" $(AWK) -f $@.awk < "$(srcdir)"/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@ @-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@ +sortfor2: + @echo $@ + @AWKPATH="$(srcdir)" $(AWK) -f $@.awk < "$(srcdir)"/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@ + @-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@ + sortu: @echo $@ @AWKPATH="$(srcdir)" $(AWK) -f $@.awk >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@ diff --git a/test/Maketests b/test/Maketests index 7d50a4b3..c48b76df 100644 --- a/test/Maketests +++ b/test/Maketests @@ -1317,6 +1317,11 @@ sortfor: @AWKPATH="$(srcdir)" $(AWK) -f $@.awk < "$(srcdir)"/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@ @-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@ +sortfor2: + @echo $@ + @AWKPATH="$(srcdir)" $(AWK) -f $@.awk < "$(srcdir)"/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@ + @-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@ + sortu: @echo $@ @AWKPATH="$(srcdir)" $(AWK) -f $@.awk >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@ diff --git a/test/sortfor2.awk b/test/sortfor2.awk new file mode 100644 index 00000000..1dfca04f --- /dev/null +++ b/test/sortfor2.awk @@ -0,0 +1,11 @@ +BEGIN { + PROCINFO["sorted_in"] = "@ind_num_asc" + } + { + A[$1] = 0 + } + END { + for (I in A) B[I] = A[I] + for (I in B) SCRATCH = A[I] + for (I in A) print I + } diff --git a/test/sortfor2.in b/test/sortfor2.in new file mode 100644 index 00000000..e75357a1 --- /dev/null +++ b/test/sortfor2.in @@ -0,0 +1,2 @@ +1.0 +2.0 diff --git a/test/sortfor2.ok b/test/sortfor2.ok new file mode 100644 index 00000000..e75357a1 --- /dev/null +++ b/test/sortfor2.ok @@ -0,0 +1,2 @@ +1.0 +2.0 |