summaryrefslogtreecommitdiff
path: root/handy.h
diff options
context:
space:
mode:
authorMarcus Holland-Moritz <mhx-perl@gmx.net>2008-10-22 03:37:31 +0200
committerMarcus Holland-Moritz <mhx-perl@gmx.net>2008-10-24 16:35:48 +0000
commitd7a2c63ca1dd960ced99dbacbd31f848d2ffa77f (patch)
treea8f59c0ca2d4b6923117b257ea5456767b8b28db /handy.h
parent0b0ab8012d4b74bc5d71b9135bd023ebdcf5e983 (diff)
downloadperl-d7a2c63ca1dd960ced99dbacbd31f848d2ffa77f.tar.gz
Add SV allocation tracing to -Dm and PERL_MEM_LOG
Message-ID: <20081022013731.23b5a2e5@r2d2> p4raw-id: //depot/perl@34568
Diffstat (limited to 'handy.h')
-rw-r--r--handy.h7
1 files changed, 6 insertions, 1 deletions
diff --git a/handy.h b/handy.h
index c07350db57..39e3ef838c 100644
--- a/handy.h
+++ b/handy.h
@@ -773,9 +773,14 @@ Malloc_t Perl_mem_log_free(Malloc_t oldalloc, const char *filename, const int li
enum mem_log_type {
MLT_ALLOC,
MLT_REALLOC,
- MLT_FREE
+ MLT_FREE,
+ MLT_NEW_SV,
+ MLT_DEL_SV
};
# endif
+/* those are only used in sv.c */
+void Perl_mem_log_new_sv(const SV *sv, const char *filename, const int linenumber, const char *funcname);
+void Perl_mem_log_del_sv(const SV *sv, const char *filename, const int linenumber, const char *funcname);
# endif
#endif