moparisthebest
/
curl
mirror of https://github.com/moparisthebest/curl
1
0
Fork 0
Code Issues Releases Wiki Activity

says nothing if no errors were found

This commit is contained in:
Daniel Stenberg 2000-11-21 15:50:17 +00:00
parent ae58d84429
commit 7db43ae0ed
1 changed files with 9 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
memanalyze.pl
View File

@ -80,19 +80,16 @@ while(<STDIN>) {
}
}
if(0 == $totalmem) {
print "No leak found\n";
exit;
}
if($totalmem) {
print "Leak detected: memory still allocated: $totalmem bytes\n";
print "Leak detected: memory still allocated: $totalmem bytes\n";
for(keys %sizeataddr) {
$addr = $_;
$size = $sizeataddr{$addr};
if($size) {
print "At $addr, there's $size bytes.\n";
print " allocated by ".$getmem{$addr}."\n";
for(keys %sizeataddr) {
$addr = $_;
$size = $sizeataddr{$addr};
if($size) {
print "At $addr, there's $size bytes.\n";
print " allocated by ".$getmem{$addr}."\n";
}
}
}