fixup repair memanalyze to find issues again

This commit is contained in:
Daniel Stenberg 2025-11-24 11:38:00 +01:00
parent ae647a7941
commit ec0a71a267
No known key found for this signature in database
GPG key ID: 5CC908FDB71E12C2

View file

@ -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";
}
}
}
}