summaryrefslogtreecommitdiff
path: root/tests/misc/tac
diff options
context:
space:
mode:
authorJim Meyering <meyering@redhat.com>2008-05-08 10:33:15 +0200
committerJim Meyering <meyering@redhat.com>2008-05-08 10:33:15 +0200
commit28c9d4ecff150942d46247076c8456dd79baf178 (patch)
treeedf51c19285ab6d5cf80627d8c5b4c3472735688 /tests/misc/tac
parentce7b12ef1b4d691490a6c890341cc9a59bbcbdeb (diff)
downloadcoreutils-28c9d4ecff150942d46247076c8456dd79baf178.tar.xz
tests: remove directory, tests/tac/
* configure.ac (AC_CONFIG_FILES): Remove tests/tac/Makefile. * tests/Makefile.am (SUBDIRS): Remove tac. * tests/misc/tac: Many new tests, from... * tests/tac/Test.pm: ...here. Remove file.
Diffstat (limited to 'tests/misc/tac')
-rwxr-xr-xtests/misc/tac32
1 files changed, 32 insertions, 0 deletions
diff --git a/tests/misc/tac b/tests/misc/tac
index 208791a4a..9aa9ebaaf 100755
--- a/tests/misc/tac
+++ b/tests/misc/tac
@@ -33,6 +33,38 @@ my @Tests =
(
['segfault', '-r', {IN=>"a\n"}, {IN=>"b\n"}, {OUT=>"a\nb\n"}],
['segfault2','-r', {IN=>"a\nb\n"}, {IN=>"1\n2\n"}, {OUT=>"b\na\n2\n1\n"}],
+
+ ['basic-0', '', {IN=>""}, {OUT=>""}],
+ ['basic-a', '', {IN=>"a"}, {OUT=>"a"}],
+ ['basic-b', '', {IN=>"\n"}, {OUT=>"\n"}],
+ ['basic-c', '', {IN=>"a\n"}, {OUT=>"a\n"}],
+ ['basic-d', '', {IN=>"a\nb"}, {OUT=>"ba\n"}],
+ ['basic-e', '', {IN=>"a\nb\n"}, {OUT=>"b\na\n"}],
+ ['basic-f', '', {IN=>"1234567\n8\n"}, {OUT=>"8\n1234567\n"}],
+ ['basic-g', '', {IN=>"12345678\n9\n"}, {OUT=>"9\n12345678\n"}],
+ ['basic-h', '', {IN=>"123456\n8\n"}, {OUT=>"8\n123456\n"}],
+ ['basic-i', '', {IN=>"12345\n8\n"}, {OUT=>"8\n12345\n"}],
+ ['basic-j', '', {IN=>"1234\n8\n"}, {OUT=>"8\n1234\n"}],
+ ['basic-k', '', {IN=>"123\n8\n"}, {OUT=>"8\n123\n"}],
+
+ ['opt-b', '-b', {IN=>"\na\nb\nc"}, {OUT=>"\nc\nb\na"}],
+ ['opt-s', '-s:', {IN=>"a:b:c:"}, {OUT=>"c:b:a:"}],
+ ['opt-sb', qw(-s : -b), {IN=>":a:b:c"}, {OUT=>":c:b:a"}],
+ ['opt-r', qw(-r -s '\._+'),
+ {IN=>"1._2.__3.___4._"},
+ {OUT=>"4._3.___2.__1._"}],
+
+ ['opt-r2', qw(-r -s '\._+'),
+ {IN=>"a.___b.__1._2.__3.___4._"},
+ {OUT=>"4._3.___2.__1._b.__a.___"}],
+
+ # This gave incorrect output (.___4._2.__3._1) with tac-1.22.
+ ['opt-br', qw(-b -r -s '\._+'),
+ {IN=>"._1._2.__3.___4"}, {OUT=>".___4.__3._2._1"}],
+
+ ['opt-br2', qw(-b -r -s '\._+'),
+ {IN=>".__x.___y.____z._1._2.__3.___4"},
+ {OUT=>".___4.__3._2._1.____z.___y.__x"}],
);
# @Tests = triple_test \@Tests;