diff options
author | Arnold D. Robbins <arnold@skeeve.com> | 2013-06-27 11:54:01 +0300 |
---|---|---|
committer | Arnold D. Robbins <arnold@skeeve.com> | 2013-06-27 11:54:01 +0300 |
commit | 8e9e1dfbc6c34a6d502d9738b651ae4c70806b1b (patch) | |
tree | 5ed23a17305b92af5d2716154437051c779a65a5 /test/dfamb1.awk | |
parent | 70a3f6aad2edee778ce8bf1d8de0d19618af46bf (diff) | |
download | egawk-8e9e1dfbc6c34a6d502d9738b651ae4c70806b1b.tar.gz egawk-8e9e1dfbc6c34a6d502d9738b651ae4c70806b1b.tar.bz2 egawk-8e9e1dfbc6c34a6d502d9738b651ae4c70806b1b.zip |
New test case for dfa problem fixed earlier.
Diffstat (limited to 'test/dfamb1.awk')
-rw-r--r-- | test/dfamb1.awk | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/test/dfamb1.awk b/test/dfamb1.awk new file mode 100644 index 00000000..7647adf5 --- /dev/null +++ b/test/dfamb1.awk @@ -0,0 +1,4 @@ +# The first of these used to core dump gawk. As of 7/2013 it's fixed. +# This file is to make sure that remains true. +{match($0, /(([^ \?.]*\?pos=ad |([^ \?.]*\?pos=(jj|va) )地\?pos=dev ){0,2})/ , arr)} { if(arr[0]) print arr[1], arr[4], $6} +{match($0, /(([^ \?.]*\?pos=ad |([^ \?.]*\?pos=(jj|va) )[地]\?pos=dev ){0,2})/ , arr)} { if(arr[0]) print arr[1], arr[4], $6} |