mirror of
https://github.com/curl/curl.git
synced 2026-06-16 12:45:39 +03:00
fixup repair memanalyze to find issues again
This commit is contained in:
parent
ae647a7941
commit
ec0a71a267
1 changed files with 10 additions and 4 deletions
|
|
@ -153,14 +153,20 @@ while(<$fileh>) {
|
|||
}
|
||||
elsif($line =~ /^LIMIT ([^ ]*):(\d*) (.*)/) {
|
||||
# new memory limit test prefix
|
||||
my $i = $3;
|
||||
my ($source, $linenum) = ($1, $2);
|
||||
my ($source, $linenum, $i) = ($1, $2, $3);
|
||||
if($i =~ /([^ ]*) reached memlimit/) {
|
||||
if($trace) {
|
||||
print "LIMIT: $1 returned error at $source:$linenum\n";
|
||||
}
|
||||
if($strict && !$overlook{$source, $linenum}) {
|
||||
$memwarn++;
|
||||
if(!$overlook{$source, $linenum}) {
|
||||
if($strict) {
|
||||
# make next occurance cause problem
|
||||
$memwarn++;
|
||||
}
|
||||
elsif($memwarn) {
|
||||
print "ERROR: Previously ignored OOM\n";
|
||||
print "ERROR: here $source:$linenum\n";
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue