1
0
mirror of https://github.com/moparisthebest/curl synced 2024-12-21 23:58:49 -05:00

supprt for the new memlimit stuff

This commit is contained in:
Daniel Stenberg 2003-08-14 22:38:03 +00:00
parent 09b5ddaea5
commit 3974c02bb1

View File

@ -45,7 +45,15 @@ while(<FILE>) {
chomp $_;
$line = $_;
if($line =~ /^MEM ([^ ]*):(\d*) (.*)/) {
if($line =~ /^LIMIT ([^ ]*):(\d*) (.*)/) {
# new memory limit test prefix
my $i = $3;
my ($source, $linenum) = ($1, $2);
if($trace && ($i =~ /([^ ]*) reached memlimit/)) {
print "LIMIT: $1 returned error at $source:$linenum\n";
}
}
elsif($line =~ /^MEM ([^ ]*):(\d*) (.*)/) {
# generic match for the filename+linenumber
$source = $1;
$linenum = $2;