summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xtests/memanalyze.pl10
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;