diff options
author | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-02-26 13:13:18 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2008-02-26 13:13:18 +0000 |
commit | d2c25739add64fa456c06f60e5029d44b4a14912 (patch) | |
tree | fd88aed2355e7985fcc3c79800663516440557d7 /pp_hot.c | |
parent | dda32041caadc1e77d142250f9ea787d110258cc (diff) | |
download | perl-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.c | 4 |
1 files changed, 0 insertions, 4 deletions
@@ -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 { |