aboutsummaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rw-r--r--test/ChangeLog6
-rw-r--r--test/Makefile.am3
-rw-r--r--test/Makefile.in8
-rw-r--r--test/Maketests5
-rw-r--r--test/arraysort.awk11
-rw-r--r--test/arraysort.ok13
6 files changed, 46 insertions, 0 deletions
diff --git a/test/ChangeLog b/test/ChangeLog
index c429ce4c..ee4c679d 100644
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,3 +1,9 @@
+Fri Apr 1 11:56:54 2011 Arnold D. Robbins <arnold@skeeve.com>
+
+ * arraysort.awk, arraysort.ok: New files from John Haque,
+ edited somewhat.
+ * Makefile.am (arraysort): New test.
+
Wed Mar 30 22:00:59 2011 Arnold D. Robbins <arnold@skeeve.com>
* next.sh, exit.sh: New files from John Haque, edited somewhat.
diff --git a/test/Makefile.am b/test/Makefile.am
index 2fecaca0..ad44ffa8 100644
--- a/test/Makefile.am
+++ b/test/Makefile.am
@@ -46,6 +46,8 @@ EXTRA_DIST = \
anchgsub.awk \
anchgsub.in \
anchgsub.ok \
+ arraysort.awk \
+ arraysort.ok \
argarray.awk \
argarray.in \
argarray.ok \
@@ -767,6 +769,7 @@ UNIX_TESTS = fflush getlnhd localenl pid pipeio1 pipeio2 poundbang space strftln
GAWK_EXT_TESTS = \
aadelete1 aadelete2 aarray1 aasort aasorti \
+ arraysort \
argtest backw badargs beginfile1 binmode1 clos1way \
devfd devfd1 devfd2 dumpvars \
fieldwdth fpat1 funlen fsfwfs fwtest fwtest2 gensub gensub2 getlndir \
diff --git a/test/Makefile.in b/test/Makefile.in
index 51bdf298..7e57d7e1 100644
--- a/test/Makefile.in
+++ b/test/Makefile.in
@@ -231,6 +231,8 @@ EXTRA_DIST = \
anchgsub.awk \
anchgsub.in \
anchgsub.ok \
+ arraysort.awk \
+ arraysort.ok \
argarray.awk \
argarray.in \
argarray.ok \
@@ -951,6 +953,7 @@ BASIC_TESTS = addcomma anchgsub argarray arrayparm arrayprm2 arrayprm3 \
UNIX_TESTS = fflush getlnhd localenl pid pipeio1 pipeio2 poundbang space strftlng
GAWK_EXT_TESTS = \
aadelete1 aadelete2 aarray1 aasort aasorti \
+ arraysort \
argtest backw badargs beginfile1 binmode1 clos1way \
devfd devfd1 devfd2 dumpvars \
fieldwdth fpat1 funlen fsfwfs fwtest fwtest2 gensub gensub2 getlndir \
@@ -2565,6 +2568,11 @@ aasorti:
@AWKPATH=$(srcdir) $(AWK) -f $@.awk >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@
@-$(CMP) $(srcdir)/$@.ok _$@ && rm -f _$@
+arraysort:
+ @echo arraysort
+ @AWKPATH=$(srcdir) $(AWK) -f $@.awk >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@
+ @-$(CMP) $(srcdir)/$@.ok _$@ && rm -f _$@
+
backw:
@echo backw
@AWKPATH=$(srcdir) $(AWK) -f $@.awk < $(srcdir)/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@
diff --git a/test/Maketests b/test/Maketests
index ea4b76d4..70b7df68 100644
--- a/test/Maketests
+++ b/test/Maketests
@@ -865,6 +865,11 @@ aasorti:
@AWKPATH=$(srcdir) $(AWK) -f $@.awk >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@
@-$(CMP) $(srcdir)/$@.ok _$@ && rm -f _$@
+arraysort:
+ @echo arraysort
+ @AWKPATH=$(srcdir) $(AWK) -f $@.awk >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@
+ @-$(CMP) $(srcdir)/$@.ok _$@ && rm -f _$@
+
backw:
@echo backw
@AWKPATH=$(srcdir) $(AWK) -f $@.awk < $(srcdir)/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@
diff --git a/test/arraysort.awk b/test/arraysort.awk
new file mode 100644
index 00000000..28535528
--- /dev/null
+++ b/test/arraysort.awk
@@ -0,0 +1,11 @@
+# Date: Thu, 31 Mar 2011 12:29:09 -0600
+# From: j.eh@mchsi.com
+
+BEGIN { a[100]=a[1]=a["x"]=a["y"]=1; PROCINFO["sorted_in"]="num";
+for (i in a) print i, a[i] }
+
+BEGIN { a[100]=a[1]=a["x"]=1; PROCINFO["sorted_in"]="num";
+for (i in a) print i, a[i] }
+
+BEGIN { a[0]=a[100]=a[1]=a["x"]=1; PROCINFO["sorted_in"]="num";
+for (i in a) print i, a[i] }
diff --git a/test/arraysort.ok b/test/arraysort.ok
new file mode 100644
index 00000000..2306e8a9
--- /dev/null
+++ b/test/arraysort.ok
@@ -0,0 +1,13 @@
+x 1
+y 1
+1 1
+100 1
+x 1
+y 1
+1 1
+100 1
+0 1
+x 1
+y 1
+1 1
+100 1