This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Benchmark.t: add more diag output
[perl5.git] / lib / sort.t
index ca809b0..b44269a 100644 (file)
@@ -125,8 +125,6 @@ sub main {
        $status = checkequal(\@sorted, $unsorted);
        is($status, '', "contents ok for size $ts");
     }
-    # If the following test (#58) fails, see the comments in pp_sort.c
-    # for Perl_sortsv().
     if ($expect_unstable) {
        ok($unstable_num > 0, 'Instability ok');
     }