aboutsummaryrefslogtreecommitdiffstats
path: root/test
diff options
context:
space:
mode:
authorArnold D. Robbins <arnold@skeeve.com>2019-11-03 22:01:04 +0200
committerArnold D. Robbins <arnold@skeeve.com>2019-11-03 22:01:04 +0200
commita4f9e9d4adbbf55a4225484ef3d04e8cf5e3046c (patch)
tree9aea74035cf66150aabf5bb41feb349e7a580954 /test
parente6b8d8dcc8bf46028c2e26586afb1cd6ea184a59 (diff)
downloadegawk-a4f9e9d4adbbf55a4225484ef3d04e8cf5e3046c.tar.gz
egawk-a4f9e9d4adbbf55a4225484ef3d04e8cf5e3046c.tar.bz2
egawk-a4f9e9d4adbbf55a4225484ef3d04e8cf5e3046c.zip
Fix a bug with FPAT field parsing.
Diffstat (limited to 'test')
-rw-r--r--test/ChangeLog5
-rw-r--r--test/Makefile.am9
-rw-r--r--test/Makefile.in14
-rw-r--r--test/Maketests5
-rw-r--r--test/fpat7.awk2
-rw-r--r--test/fpat7.in1
-rw-r--r--test/fpat7.ok1
7 files changed, 31 insertions, 6 deletions
diff --git a/test/ChangeLog b/test/ChangeLog
index 0ec118e4..cd503c39 100644
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,3 +1,8 @@
+2019-11-03 Arnold D. Robbins <arnold@skeeve.com>
+
+ * Makefile.am (EXTRA_DISTS): New test, fpat7.
+ * fpat7.awk, fpat7.ok, fpat7.in: New files.
+
2019-10-13 Arnold D. Robbins <arnold@skeeve.com>
* Makefile.am (EXTRA_DISTS): New tests, typedregex5 and
diff --git a/test/Makefile.am b/test/Makefile.am
index 053ff545..84a71bc8 100644
--- a/test/Makefile.am
+++ b/test/Makefile.am
@@ -366,6 +366,9 @@ EXTRA_DIST = \
fpat6.awk \
fpat6.in \
fpat6.ok \
+ fpat7.awk \
+ fpat7.in \
+ fpat7.ok \
fpatnull.awk \
fpatnull.in \
fpatnull.ok \
@@ -1368,9 +1371,9 @@ GAWK_EXT_TESTS = \
dbugeval dbugeval2 dbugeval3 dbugtypedre1 dbugtypedre2 delsub \
devfd devfd1 devfd2 dfacheck1 dumpvars \
errno exit \
- fieldwdth forcenum fpat1 fpat2 fpat3 fpat4 fpat5 fpat6 fpatnull fsfwfs \
- funlen functab1 functab2 functab3 fwtest fwtest2 fwtest3 fwtest4 \
- fwtest5 fwtest6 fwtest7 fwtest8 \
+ fieldwdth forcenum fpat1 fpat2 fpat3 fpat4 fpat5 fpat6 fpat7 fpatnull \
+ fsfwfs funlen functab1 functab2 functab3 \
+ fwtest fwtest2 fwtest3 fwtest4 fwtest5 fwtest6 fwtest7 fwtest8 \
genpot gensub gensub2 gensub3 getlndir gnuops2 gnuops3 gnureops gsubind \
icasefs icasers id igncdym igncfs ignrcas2 ignrcas4 ignrcase incdupe \
incdupe2 incdupe3 incdupe4 incdupe5 incdupe6 incdupe7 include include2 \
diff --git a/test/Makefile.in b/test/Makefile.in
index 357f3b16..7bbacf1a 100644
--- a/test/Makefile.in
+++ b/test/Makefile.in
@@ -625,6 +625,9 @@ EXTRA_DIST = \
fpat6.awk \
fpat6.in \
fpat6.ok \
+ fpat7.awk \
+ fpat7.in \
+ fpat7.ok \
fpatnull.awk \
fpatnull.in \
fpatnull.ok \
@@ -1627,9 +1630,9 @@ GAWK_EXT_TESTS = \
dbugeval dbugeval2 dbugeval3 dbugtypedre1 dbugtypedre2 delsub \
devfd devfd1 devfd2 dfacheck1 dumpvars \
errno exit \
- fieldwdth forcenum fpat1 fpat2 fpat3 fpat4 fpat5 fpat6 fpatnull fsfwfs \
- funlen functab1 functab2 functab3 fwtest fwtest2 fwtest3 fwtest4 \
- fwtest5 fwtest6 fwtest7 fwtest8 \
+ fieldwdth forcenum fpat1 fpat2 fpat3 fpat4 fpat5 fpat6 fpat7 fpatnull \
+ fsfwfs funlen functab1 functab2 functab3 \
+ fwtest fwtest2 fwtest3 fwtest4 fwtest5 fwtest6 fwtest7 fwtest8 \
genpot gensub gensub2 gensub3 getlndir gnuops2 gnuops3 gnureops gsubind \
icasefs icasers id igncdym igncfs ignrcas2 ignrcas4 ignrcase incdupe \
incdupe2 incdupe3 incdupe4 incdupe5 incdupe6 incdupe7 include include2 \
@@ -4250,6 +4253,11 @@ fpat6:
@AWKPATH="$(srcdir)" $(AWK) -f $@.awk < "$(srcdir)"/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@
@-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@
+fpat7:
+ @echo $@
+ @AWKPATH="$(srcdir)" $(AWK) -f $@.awk < "$(srcdir)"/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@
+ @-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@
+
fpatnull:
@echo $@
@AWKPATH="$(srcdir)" $(AWK) -f $@.awk < "$(srcdir)"/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@
diff --git a/test/Maketests b/test/Maketests
index 3e443f54..627d6ecf 100644
--- a/test/Maketests
+++ b/test/Maketests
@@ -1416,6 +1416,11 @@ fpat6:
@AWKPATH="$(srcdir)" $(AWK) -f $@.awk < "$(srcdir)"/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@
@-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@
+fpat7:
+ @echo $@
+ @AWKPATH="$(srcdir)" $(AWK) -f $@.awk < "$(srcdir)"/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@
+ @-$(CMP) "$(srcdir)"/$@.ok _$@ && rm -f _$@
+
fpatnull:
@echo $@
@AWKPATH="$(srcdir)" $(AWK) -f $@.awk < "$(srcdir)"/$@.in >_$@ 2>&1 || echo EXIT CODE: $$? >>_$@
diff --git a/test/fpat7.awk b/test/fpat7.awk
new file mode 100644
index 00000000..9b8a6775
--- /dev/null
+++ b/test/fpat7.awk
@@ -0,0 +1,2 @@
+BEGIN { FPAT = "[^,]*" }
+{ print $1, $2 }
diff --git a/test/fpat7.in b/test/fpat7.in
new file mode 100644
index 00000000..0cbe3bdb
--- /dev/null
+++ b/test/fpat7.in
@@ -0,0 +1 @@
+,b
diff --git a/test/fpat7.ok b/test/fpat7.ok
new file mode 100644
index 00000000..64e2aadd
--- /dev/null
+++ b/test/fpat7.ok
@@ -0,0 +1 @@
+ b