Skip to content
Snippets Groups Projects
Commit 3974c02b authored by Daniel Stenberg's avatar Daniel Stenberg
Browse files

supprt for the new memlimit stuff

parent 09b5ddae
No related branches found
No related tags found
No related merge requests found
......@@ -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;
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment