From: Jim Meyering <jim@meyering.net>
Date: Fri, 1 Dec 1995 07:32:12 +0000 (+0000)
Subject:  Exercise bug re comparing `-' and integers.
X-Git-Tag: TEXTUTILS-1_13g~2
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=5106e930d14cc012c6ff5185d9cb5fca619aaf5d;p=thirdparty%2Fcoreutils.git

 Exercise bug re comparing `-' and integers.
---

diff --git a/tests/sort/test.data.pl b/tests/sort/test.data.pl
index 92ea8b1888..f475b98c49 100755
--- a/tests/sort/test.data.pl
+++ b/tests/sort/test.data.pl
@@ -83,3 +83,10 @@
 ("11b", '-t: -k1,1b -k2,2', "a :b\na\t:a\n", "a\t:a\na :b\n", 0);
 ("11c", '-t: -k2,2b -k3,3', "z:a\t:a\na :b\n", "z:a\t:a\na :b\n", 0);
 ("11d", '-t: -k2,2b -k3,3', "z:a :b\na\t:a\n", "a\t:a\nz:a :b\n", 0);
+#
+# Exercise bug re comparing `-' and integers.
+("12a", '-n -t: +1', "a:1\nb:-\n", "b:-\na:1\n", 0);
+("12b", '-n -t: +1', "b:-\na:1\n", "b:-\na:1\n", 0);
+# Try some other (e.g. `X') invalid character.
+("12c", '-n -t: +1', "a:1\nb:X\n", "b:X\na:1\n", 0);
+("12d", '-n -t: +1', "b:X\na:1\n", "b:X\na:1\n", 0);