From: Jim Meyering <jim@meyering.net>
Date: Sat, 8 Jan 2005 09:35:04 +0000 (+0000)
Subject: (test_vector): For each -N test, automatically
X-Git-Tag: v5.3.0~8
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=08f451c3f442ff764fe3cc61fe71635c27ee1567;p=thirdparty%2Fcoreutils.git

(test_vector): For each -N test, automatically
create a new test vector using --columns=N.
---

diff --git a/tests/pr/Test.pm b/tests/pr/Test.pm
index e60b0347f6..8512bbf70b 100644
--- a/tests/pr/Test.pm
+++ b/tests/pr/Test.pm
@@ -363,6 +363,10 @@ sub test_vector
       my $sep = ($flags ? ' ' : '');
       $flags = "$common_option_prefix$sep$flags";
       push (@new_tv, [$test_name, $flags, $in, $exp, $ret]);
+
+      (my $new_flags = $flags) =~ s/(^| )-(\d+)( |$)/$1--columns=$2$3/g;
+      $new_flags ne $flags
+	and push (@new_tv, ["$test_name.C", $new_flags, $in, $exp, $ret]);
     }
 
   return @new_tv;