In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/b953482e2d970eeb88de96a38c087d03db83a5cd?hp=2e5b50041f3643ca27385b211da60add40857ec8>
- Log ----------------------------------------------------------------- commit b953482e2d970eeb88de96a38c087d03db83a5cd Author: Jim Cromie <[email protected]> Date: Sun Jun 21 07:52:28 2009 -0600 drop remaining mentions of PERL_MEM_LOG_FOO envars perl.c has the last mentions of PERL_MEM_LOG_ENV*. drop them too. (rgs: plus some in handy.h's comments too) ----------------------------------------------------------------------- Summary of changes: handy.h | 2 +- perl.c | 9 --------- 2 files changed, 1 insertions(+), 10 deletions(-) diff --git a/handy.h b/handy.h index d890f70..d390667 100644 --- a/handy.h +++ b/handy.h @@ -784,7 +784,7 @@ PoisonWith(0xEF) for catching access to freed memory. * through reallocs and frees, but how to do that without * any News() happening...? * - lots of -Ddefines to get useful/controllable output - * - lots of ENV reads when you get control -DPERL_MEM_LOG_ENV* + * - lots of ENV reads */ PERL_EXPORT_C Malloc_t Perl_mem_log_alloc(const UV n, const UV typesize, const char *type_name, Malloc_t newalloc, const char *filename, const int linenumber, const char *funcname); diff --git a/perl.c b/perl.c index 4712a8b..e70bf7e 100644 --- a/perl.c +++ b/perl.c @@ -1772,18 +1772,9 @@ S_parse_body(pTHX_ char **env, XSINIT_t xsinit) # ifdef PERL_MEM_LOG " PERL_MEM_LOG" # endif -# ifdef PERL_MEM_LOG_ENV - " PERL_MEM_LOG_ENV" -# endif -# ifdef PERL_MEM_LOG_ENV_FD - " PERL_MEM_LOG_ENV_FD" -# endif # ifdef PERL_MEM_LOG_NOIMPL " PERL_MEM_LOG_NOIMPL" # endif -# ifdef PERL_MEM_LOG_TIMESTAMP - " PERL_MEM_LOG_TIMESTAMP" -# endif # ifdef PERL_USE_DEVEL " PERL_USE_DEVEL" # endif -- Perl5 Master Repository
