diff --git a/util/memleak.pl b/util/memleak.pl index bd97fe692a..df4b5d3b55 100644 --- a/util/memleak.pl +++ b/util/memleak.pl @@ -21,8 +21,8 @@ $mem_stats = ''; while (<>) { - $gets{$1.$2} = $_ if /mem_get\(([0-9]+), [0-9]+\) -> ([0-9a-f]+)/; - delete $gets{$1.$2} if /mem_put\(([0-9]+), ([0-9a-f]+), [0-9]+\)/; + $gets{$1.$2} = $_ if (/mem_get\(([0-9a-f]+), [0-9a-f]+\) -> ([0-9a-f]+)/); + delete $gets{$1.$2} if /mem_put\(([0-9a-f]+), ([0-9a-f]+), [0-9a-f]+\)/; $mem_stats .= $_ if /\d+ gets, +(\d+) rem/ && $1 > 0; } print join('', values %gets);