summaryrefslogtreecommitdiff
path: root/tests
diff options
context:
space:
mode:
authorJim Meyering <jim@meyering.net>1995-08-03 16:44:17 +0000
committerJim Meyering <jim@meyering.net>1995-08-03 16:44:17 +0000
commite799d19df822fb0c87dbc8f7bd797686d7f7eff5 (patch)
tree2a5e25f42b33af85b099acbb1de625f4996b9216 /tests
parentb1ab76f3e4d60d017865c87ace385490d1592509 (diff)
downloadcoreutils-e799d19df822fb0c87dbc8f7bd797686d7f7eff5.tar.xz
.
Diffstat (limited to 'tests')
-rwxr-xr-xtests/sort/test.data.pl11
1 files changed, 11 insertions, 0 deletions
diff --git a/tests/sort/test.data.pl b/tests/sort/test.data.pl
index 8198edabe..313fe889f 100755
--- a/tests/sort/test.data.pl
+++ b/tests/sort/test.data.pl
@@ -1,3 +1,4 @@
+# -*-perl-*-
#test options input expected-output expected-return-code
#
("1a", '', "A\nB\nC\n", "A\nB\nC\n", 0);
@@ -37,3 +38,13 @@
("6d", '-k 2,2', "A B A\nA A Z\n", "A A Z\nA B A\n", 0);
("6e", '-k 2,2', "A B Z\nA A A\n", "A A A\nA B Z\n", 0);
("6f", '-k 2,2', "A B A\nA A Z\n", "A A Z\nA B A\n", 0);
+#
+("7a", '-k 2,3', "9 a b\n7 a a\n", "7 a a\n9 a b\n", 0);
+("7b", '-k 2,3', "a a b\nz a a\n", "z a a\na a b\n", 0);
+("7c", '-k 2,3', "y k b\nz k a\n", "z k a\ny k b\n", 0);
+("7d", '+1 -3', "y k b\nz k a\n", "z k a\ny k b\n", 0);
+#
+# FIXME: report an error for `.' but missing char spec
+("8a", '-k 2.,3', "", "", 1);
+# FIXME: report an error for `,' but missing POS2
+("8b", '-k 2,', "", "", 1);