2 files changed, 1 insertions, 10 deletions
diff --git a/handy.h b/handy.h
index d890f70994..d39066752c 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 4712a8b7f3..e70bf7e4e3 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