Magic-Mirror/gecko-dev
1
0
Fork 0
mirror of https://github.com/mozilla/gecko-dev.git synced 2024-10-11 04:15:43 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Fix some -w warnings.

Browse Source
This commit is contained in:
slamm%netscape.com 2000-02-26 02:17:15 +00:00
parent 4e3e72a47c
commit e00de39569
2 changed files with 10 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
tools/tinderbox/bloatdiff.pl
View File

@ -231,7 +231,7 @@ if (!$needsHeading) {
# NEW CLASSES
@keys = sort { $newMap{$b}{bloatDelta} <=> $newMap{$a}{bloatDelta} } keys %newMap;
my $needsHeading = 1;
$needsHeading = 1;
my $ltotal = 0;
my $btotal = 0;
foreach $key (@keys) {
@ -256,9 +256,9 @@ if (!$needsHeading) {
# OLD CLASSES
@keys = sort { ($oldMap{$b}{bloat} || 0) <=> ($oldMap{$a}{bloat} || 0) } keys %oldMap;
my $needsHeading = 1;
my $ltotal = 0;
my $btotal = 0;
$needsHeading = 1;
$ltotal = 0;
$btotal = 0;
foreach $key (@keys) {
if (!defined($newMap{$key})) {
my $leaks = $oldMap{$key}{leaked};

10
tools/tinderbox/build-seamonkey.pl
View File

@ -11,7 +11,7 @@ use POSIX qw(sys_wait_h strftime);
use Cwd;
use File::Basename; # for basename();
$::Version = '$Revision: 1.72 $ ';
$::Version = '$Revision: 1.73 $ ';
sub PrintUsage {
die <<END_USAGE
@ -294,9 +294,11 @@ sub mail_build_finished_message {
open LOG, "$logfile" or die "Couldn't open logfile, $logfile: $!";
while (<LOG>) {
for (my $offset = 0; ; $offset += 1000) {
my $output = substr $_, $offset, 1000;
last if $output eq undef;
my $length = length($_);
for (my $offset = 0; $offset < $length ; $offset += 1000) {
my $chars_left = $length - $offset;
my $output_length = $chars_left < 1000 ? $chars_left : 1000;
my $output = substr $_, $offset, $output_length;
$output =~ s/^\.$//g;
$output =~ s/\n//g;
print OUTLOG "$output\n";