diff options
Diffstat (limited to 'tests')
| -rwxr-xr-x | tests/misc/comm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/tests/misc/comm b/tests/misc/comm index 81a852944..80a0c2dd3 100755 --- a/tests/misc/comm +++ b/tests/misc/comm @@ -2,7 +2,7 @@ # -*- perl -*- # Test comm -# Copyright (C) 2008 Free Software Foundation, Inc. +# Copyright (C) 2008-2009 Free Software Foundation, Inc. # This program is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by @@ -116,6 +116,13 @@ my @Tests = {OUT => "\t\t2\n"}, {ERR => "$prog: file 1 is not in sorted order\n"}], + # out-of-order, line 2 is a prefix of line 1 + # until coreutils-7.2, this test would fail -- no disorder detected + ['ooo-prefix', '--check-order', {IN=>{a=>"Xa\nX\n"}}, {IN=>{b=>""}}, + {EXIT=>1}, + {OUT => "Xa\n"}, + {ERR => "$prog: file 1 is not in sorted order\n"}], + # alternate delimiter: ',' ['delim-comma', '--output-delimiter=,', @inputs, {OUT=>"1\n,2\n,,3\n"} ], |