summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-11-24 21:45:32 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-11-24 21:45:32 +0000
commit128e8167dcdd0091242ba8e29bb716abeb5fe027 (patch)
treec269c2e4acd4bd1f821e2f5c6deae0f13634ef04 /perl.c
parent9d077eaaaaf5479060d3eabcfb6d60f086ba857a (diff)
downloadperl-128e8167dcdd0091242ba8e29bb716abeb5fe027.tar.gz
The debug_pag needs to be visible at all times
because of the re extension. p4raw-id: //depot/perl@13246
Diffstat (limited to 'perl.c')
-rw-r--r--perl.c6
1 files changed, 0 insertions, 6 deletions
diff --git a/perl.c b/perl.c
index 13c7d31581..14fda3533f 100644
--- a/perl.c
+++ b/perl.c
@@ -273,12 +273,6 @@ perl_construct(pTHXx)
New(31337, PL_reentrant_buffer->tmbuff,1, struct tm);
#endif
-#ifdef DEBUGGING
- sv_setpvn(PERL_DEBUG_PAD(0), "", 0);
- sv_setpvn(PERL_DEBUG_PAD(1), "", 0);
- sv_setpvn(PERL_DEBUG_PAD(2), "", 0);
-#endif
-
/* Note that strtab is a rather special HV. Assumptions are made
about not iterating on it, and not adding tie magic to it.
It is properly deallocated in perl_destruct() */