From: Jim Cromie <jim.cromie@gmail.com>
Date: Sun, 21 Jun 2009 13:52:28 +0000 (-0600)
Subject: drop remaining mentions of PERL_MEM_LOG_FOO envars
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b953482e2d970eeb88de96a38c087d03db83a5cd;p=p5sagit%2Fp5-mst-13.2.git

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)
---

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