CC-tea/coreutils
1
0
Fork 0
mirror of git://git.sv.gnu.org/coreutils.git synced 2026-04-20 18:56:39 +02:00
Code Issues Projects Releases Wiki Activity

(8-bit-t): New test for the above fix.

Browse Source
This commit is contained in:
Jim Meyering
2000-11-16 14:19:00 +00:00
parent ea9a4e4755
commit b77cb25935
1 changed files with 12 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
tests/join/Test.pm
View File

@@ -2,6 +2,13 @@ package Test;
require 5.002;
use strict;
my $delim = chr 0247;
sub t_subst ($)
{
(my $s = $_[0]) =~ s/:/$delim/g;
return $s;
}
my @tv = (
# test name
# flags file-1 file-2 expected output expected return code
@@ -105,6 +112,11 @@ my @tv = (
# fail on e.g. Linux systems, because the input to join isn't sorted.
# ['lc-collate', '', ["a 1a\nB 1B\n", "B 2B\n"], "B 1B 2B\n", 0],
# Based on a report from Antonio Rendas. Fixed in 2.0.9.
['8-bit-t', t_subst "-t:",
[t_subst "a:1\nb:1\n", t_subst "a:2:\nb:2:\n"],
t_subst "a:1:2:\nb:1:2:\n", 0],
);