diff options
Diffstat (limited to 'tests')
| -rw-r--r-- | tests/015/awk-rng.expected | 4 | ||||
| -rw-r--r-- | tests/015/awk-rng.tl | 4 |
2 files changed, 7 insertions, 1 deletions
diff --git a/tests/015/awk-rng.expected b/tests/015/awk-rng.expected index ad33b30b..aa79a932 100644 --- a/tests/015/awk-rng.expected +++ b/tests/015/awk-rng.expected @@ -20,6 +20,10 @@ X1X2 t t t Y1 t t t end t t t a end end t t Y2 end end t t +X1X2Y1Y2 t t end end t t +a +X1X2Y1Y2 t t end t t +X1X2Y1Y2 t t end end t t X1 t t t b t t t t t t X2 t t t t t t diff --git a/tests/015/awk-rng.tl b/tests/015/awk-rng.tl index 8bf2fa3c..4c74bc48 100644 --- a/tests/015/awk-rng.tl +++ b/tests/015/awk-rng.tl @@ -1,6 +1,8 @@ (awk (:inputs '#"X1 a b X1 c X2 1 2 3 Y1 r s Y2 t Y2" '#"X1X2 Y1Y2" - '#"X1X2 Y1 a Y2 X1 b X2") + '#"X1X2 Y1 a Y2" + '#"X1X2Y1Y2 a X1X2Y1Y2 X1X2Y1Y2" + '#"X1 b X2") (:set ofs "\t") (:begin (prn 'rec 'rng '-rng 'rng- '-rng- '--rng- '--rng 'rng+ '-rng+ '--rng+ 'Y1Y2)) |