From b54c86e8bc5b8541b079fdbb0ae678f11b30100b Mon Sep 17 00:00:00 2001 From: Jim Meyering Date: Sat, 16 May 1998 20:35:19 +0000 Subject: add 2 more tsts --- tests/tac/Test.pm | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/tests/tac/Test.pm b/tests/tac/Test.pm index e73f162da..cf5ca92ca 100644 --- a/tests/tac/Test.pm +++ b/tests/tac/Test.pm @@ -31,8 +31,14 @@ my @tv = ( ['opt-sb', '-s : -b', ":a:b:c", ":c:b:a", 0], ['opt-r', "-r -s '\\._+'", "1._2.__3.___4._", "4._3.___2.__1._", 0], +['opt-r2', "-r -s '\\._+'", "a.___b.__1._2.__3.___4._", + "4._3.___2.__1._b.__a.___", 0], + # This gave incorrect output (.___4._2.__3._1) with tac-1.22. ['opt-br', "-b -r -s '\\._+'", "._1._2.__3.___4", ".___4.__3._2._1", 0], + +['opt-br2', "-b -r -s '\\._+'", ".__x.___y.____z._1._2.__3.___4", + ".___4.__3._2._1.____z.___y.__x", 0], ); sub test_vector -- cgit v1.2.3-70-g09d2