diff options
| author | Arnold D. Robbins <arnold@skeeve.com> | 2010-07-16 14:47:02 +0300 |
|---|---|---|
| committer | Arnold D. Robbins <arnold@skeeve.com> | 2010-07-16 14:47:02 +0300 |
| commit | 315bd501ca696bc3e3c938b4604d8dac7a6f512f (patch) | |
| tree | cf992f0df002126292f7487ca6c0d36d7fe748b9 /test/gnuops3.awk | |
| parent | 85c0d5edb781c9f31b79e48452b1ca68643f41de (diff) | |
| download | egawk-315bd501ca696bc3e3c938b4604d8dac7a6f512f.tar.gz egawk-315bd501ca696bc3e3c938b4604d8dac7a6f512f.tar.bz2 egawk-315bd501ca696bc3e3c938b4604d8dac7a6f512f.zip | |
Move to gawk 3.1.5.
Diffstat (limited to 'test/gnuops3.awk')
| -rw-r--r-- | test/gnuops3.awk | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/test/gnuops3.awk b/test/gnuops3.awk new file mode 100644 index 00000000..bcd40aa1 --- /dev/null +++ b/test/gnuops3.awk @@ -0,0 +1,14 @@ +# Mon Jan 31 09:57:30 IST 2005 +# test both dfa and regex matchers on \B +# tests from Stepan Kasal, kasal@ucw.cz +BEGIN { + + print (" " ~ / \B /) # test dfa matcher + print ("a b" ~ /\B/) + print (" b" ~ /\B/) + print ("a " ~ /\B/) + + a = " " + gsub(/\B/, "x", a) # test regex matcher + print a +} |