From: Daniel Stenberg <daniel@haxx.se>
Date: Thu, 14 Aug 2003 22:38:03 +0000 (+0000)
Subject: supprt for the new memlimit stuff
X-Git-Tag: curl-7_10_7~5
X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=3974c02bb1bc13c252208e31746821853eb235aa;p=curl

supprt for the new memlimit stuff
---

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;