Operator change. No difference in behaviour, but avoids a warning with Perl

5.8.0.


git-svn-id: svn://svn.valgrind.org/valgrind/trunk@1713
This commit is contained in:
Nicholas Nethercote 2003-07-04 15:59:49 +00:00
parent 07682a21ed
commit 7dede6c740

View File

@ -618,7 +618,7 @@ sub print_summary_and_fn_totals ()
my $reached_all_thresholds = 1;
foreach my $i (0 .. scalar @thresholds - 1) {
my $prop = $curr_totals[$i] * 100 / $summary_CC->[$sort_order[$i]];
$reached_all_thresholds &= ($prop >= $thresholds[$i]);
$reached_all_thresholds &&= ($prop >= $thresholds[$i]);
}
last if $reached_all_thresholds;