upstream/bind9
1
0
Fork 0
mirror of https://github.com/isc-projects/bind9.git synced 2026-06-08 22:52:06 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions

Allow field to be hex which was previously limited to decimal

Browse source
This commit is contained in:
Michael Sawyer 2000-04-27 01:36:37 +00:00
parent d536f68bee
commit 1ccf150881
1 changed files with 2 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
util/memleak.pl
View file

@ -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);