-
Notifications
You must be signed in to change notification settings - Fork 2
/
README
55 lines (42 loc) · 1.55 KB
/
README
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
NAME
Dash::Leak - Track memory allocation
SYNOPSIS
Quick summary of what the module does.
BEGIN {
# enables operation of Dash::Leak, leaksz is a nop without this
$ENV{DEBUG_MEM} = 1;
}
use Dash::Leak;
{
leaksz "block label";
# some code, that may leak
}
# If your code leaked, you'll be noticed about change
# of process vsize after leaving block
leaksz "tests begin";
some_operation($arg);
leaksz "some_operation", sub {
warn sprintf "We leaked after some_operation($arg) by %+d kilobytes;", shift
};
another_operation();
leaksz "another_operation";
# ...
use Dash::Leak sub { ... }; # Will call this cb for every alloc, instead of warn
EXPORT
Export of this module is "virtual", by using Devel::Declare. When
$ENV{DEBUG_MEM} is true, it will work, when false, this opcodes will be
ignored, like with "leaksz ... if 0";
FUNCTIONS
leaksz $label, [$cb->($delta)]
Starts tracking current block. If something changed since last note,
notice will be warned. If callback is passed, it will be invoked instead
of warn.
ACKNOWLEDGEMENTS
* Thanks to knevgen (<http://github.com/knevgen>) for linux version
patch
AUTHOR
Mons Anderson, "<mons at cpan.org>"
COPYRIGHT & LICENSE
Copyright 2010 Mons Anderson, all rights reserved.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.