summaryrefslogtreecommitdiff
path: root/util.c
diff options
context:
space:
mode:
authorMatthew Horsfall <wolfsage@gmail.com>2016-04-01 12:44:49 -0400
committerDavid Mitchell <davem@iabyn.com>2016-04-05 12:08:24 +0100
commit6fb87544af0ff2b9b9c12038bc0fb261f56a7d88 (patch)
tree66da80f2fbe098887d8e0b27081ead9197097b5b /util.c
parent726368e016b611dfdf44e3a9a53e572b2e25de73 (diff)
downloadperl-6fb87544af0ff2b9b9c12038bc0fb261f56a7d88.tar.gz
Get -Accflags=-DPERL_MEM_LOG compiling again
It had rotted a bit Well, more than one probably. Move the declarations of the functions Perl_mem_log_alloc etc from handy.h into embed.fnc where whey belong, and where Malloc_t will have already been defined.
Diffstat (limited to 'util.c')
-rw-r--r--util.c6
1 files changed, 6 insertions, 0 deletions
diff --git a/util.c b/util.c
index 9ad40c1d21..89c44e735d 100644
--- a/util.c
+++ b/util.c
@@ -5018,6 +5018,8 @@ Perl_mem_log_alloc(const UV n, const UV typesize, const char *type_name,
const char *filename, const int linenumber,
const char *funcname)
{
+ PERL_ARGS_ASSERT_MEM_LOG_ALLOC;
+
mem_log_common_if(MLT_ALLOC, n, typesize, type_name,
NULL, NULL, newalloc,
filename, linenumber, funcname);
@@ -5030,6 +5032,8 @@ Perl_mem_log_realloc(const UV n, const UV typesize, const char *type_name,
const char *filename, const int linenumber,
const char *funcname)
{
+ PERL_ARGS_ASSERT_MEM_LOG_REALLOC;
+
mem_log_common_if(MLT_REALLOC, n, typesize, type_name,
NULL, oldalloc, newalloc,
filename, linenumber, funcname);
@@ -5041,6 +5045,8 @@ Perl_mem_log_free(Malloc_t oldalloc,
const char *filename, const int linenumber,
const char *funcname)
{
+ PERL_ARGS_ASSERT_MEM_LOG_FREE;
+
mem_log_common_if(MLT_FREE, 0, 0, "", NULL, oldalloc, NULL,
filename, linenumber, funcname);
return oldalloc;