diff options
| author | srezic@cpan.org <srezic@cpan.org> | 2007-10-27 04:33:57 -0700 |
|---|---|---|
| committer | Steve Peters <steve@fisharerojo.org> | 2008-03-03 14:36:10 +0000 |
| commit | 3128eefee559edb9fdd97ad1b3eff48da114045e (patch) | |
| tree | d3fc965a44d02b581dec266804da124d28f7de22 /malloc.c | |
| parent | ac1e9476daed4b24851ae2c4ed3d43f92b6a1247 (diff) | |
| download | perl-3128eefee559edb9fdd97ad1b3eff48da114045e.tar.gz | |
[perl #46957] [PATCH] make Devel::Peek::mstat always available
From: srezic@cpan.org (via RT) <perlbug-followup@perl.org>
Message-ID: <rt-3.6.HEAD-4732-1193510037-297.46957-75-0@perl.org>
p4raw-id: //depot/perl@33414
Diffstat (limited to 'malloc.c')
| -rw-r--r-- | malloc.c | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -2450,6 +2450,8 @@ Perl_get_mstats(pTHX_ perl_mstats_t *buf, int buflen, int level) buf->bucket_available_size[i] = BUCKET_SIZE_REAL(i); } } +#else /* defined DEBUGGING_MSTATS */ + PerlIO_printf(Perl_error_log, "perl not compiled with DEBUGGING_MSTATS\n"); #endif /* defined DEBUGGING_MSTATS */ return 0; /* XXX unused */ } @@ -2523,6 +2525,8 @@ Perl_dump_mstats(pTHX_ char *s) buffer.total_sbrk, buffer.sbrks, buffer.sbrk_good, buffer.sbrk_slack, buffer.start_slack, buffer.total_chain, buffer.sbrked_remains); +#else /* DEBUGGING_MSTATS */ + PerlIO_printf(Perl_error_log, "%s: perl not compiled with DEBUGGING_MSTATS\n",s); #endif /* DEBUGGING_MSTATS */ } |