summaryrefslogtreecommitdiff
path: root/pp_hot.c
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2008-02-26 13:13:18 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2008-02-26 13:13:18 +0000
commitd2c25739add64fa456c06f60e5029d44b4a14912 (patch)
treefd88aed2355e7985fcc3c79800663516440557d7 /pp_hot.c
parentdda32041caadc1e77d142250f9ea787d110258cc (diff)
downloadperl-d2c25739add64fa456c06f60e5029d44b4a14912.tar.gz
Chainsaw DEBUG_S out, as suggested by Vincent Pit.
p4raw-id: //depot/perl@33376
Diffstat (limited to 'pp_hot.c')
-rw-r--r--pp_hot.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/pp_hot.c b/pp_hot.c
index bb510f99cc..89bab4eac1 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -2821,10 +2821,6 @@ try_autoload:
if (CvDEPTH(cv) == PERL_SUB_DEPTH_WARN && ckWARN(WARN_RECURSION)
&& !(PERLDB_SUB && cv == GvCV(PL_DBsub)))
sub_crush_depth(cv);
-#if 0
- DEBUG_S(PerlIO_printf(Perl_debug_log,
- "%p entersub returning %p\n", (void*)thr, (void*)CvSTART(cv)));
-#endif
RETURNOP(CvSTART(cv));
}
else {