diff options
-rwxr-xr-x | tests/memanalyze.pl | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/tests/memanalyze.pl b/tests/memanalyze.pl index c354a5687..dff25a8b2 100755 --- a/tests/memanalyze.pl +++ b/tests/memanalyze.pl @@ -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; |