diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2013-03-11 22:45:22 +0200 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2013-03-11 22:45:22 +0200 |
| commit | a7c502a756732ec9a1773d6169376bb7b25f4308 (patch) | |
| tree | 75dd7a168a4e695438fdc2ba4d5959fd24ff2217 /test/colonwarn.awk | |
| parent | 2b02c5c64a93608c347ffaa312d88d52f93888da (diff) | |
| download | egawk-a7c502a756732ec9a1773d6169376bb7b25f4308.tar.gz egawk-a7c502a756732ec9a1773d6169376bb7b25f4308.tar.bz2 egawk-a7c502a756732ec9a1773d6169376bb7b25f4308.zip | |
Fix a bug with ] as real char in regexps.
Diffstat (limited to 'test/colonwarn.awk')
| -rw-r--r-- | test/colonwarn.awk | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/test/colonwarn.awk b/test/colonwarn.awk new file mode 100644 index 00000000..0b0650e0 --- /dev/null +++ b/test/colonwarn.awk @@ -0,0 +1,4 @@ +BEGIN { pattern = ARGV[1] + 0; delete ARGV } +pattern == 1 { sub(/[][:space:]]/,""); print } +pattern == 2 { sub(/[\][:space:]]/,""); print } +pattern == 3 { sub(/[^][:space:]]/,""); print } |