summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2007-04-02 21:25:03 +0000
committerNicholas Clark <nick@ccl4.org>2007-04-02 21:25:03 +0000
commit5e661f6a5e9caa656f01592947f38c9e56ec3d8a (patch)
treec29f51b301efe6dde24d4d9710ff8d09c2668862 /perl.c
parente8ebc68a01b9d0ab87b23ad80d141e3fde235b2f (diff)
downloadperl-5e661f6a5e9caa656f01592947f38c9e56ec3d8a.tar.gz
Cleanups for PERL_DEBUG_READONLY_OPS debugging code - remove a now-
unneeded include of <sys/mman.h>, and make PERL_DEBUG_READONLY_OPS appear in -V output. p4raw-id: //depot/perl@30834
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c7
1 files changed, 3 insertions, 4 deletions
diff --git a/perl.c b/perl.c
index b983e7d4f0..f04f4cc99a 100644
--- a/perl.c
+++ b/perl.c
@@ -1840,6 +1840,9 @@ S_parse_body(pTHX_ char **env, XSINIT_t xsinit)
# ifdef NO_MATHOMS
" NO_MATHOMS"
# endif
+# ifdef PERL_DEBUG_READONLY_OPS
+ " PERL_DEBUG_READONLY_OPS"
+# endif
# ifdef PERL_DONT_CREATE_GVSV
" PERL_DONT_CREATE_GVSV"
# endif
@@ -2374,10 +2377,6 @@ perl_run(pTHXx)
return ret;
}
-#ifdef PERL_DEBUG_READONLY_OPS
-# include <sys/mman.h>
-#endif
-
STATIC void
S_run_body(pTHX_ I32 oldscope)
{