diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-18 14:39:15 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-03-18 14:39:15 +0000 |
commit | 48c6b404cfbd1c2c7ca26e9a9abd0c281bc5836f (patch) | |
tree | dfa745a711f2bb8d0dce658945d73bdd69c3819a /regexec.c | |
parent | 44513350cdc313b5a0c1fcf32a9a2db7a735db03 (diff) | |
download | perl-48c6b404cfbd1c2c7ca26e9a9abd0c281bc5836f.tar.gz |
Make regex DEBUGGING faster.
p4raw-id: //depot/perl@15297
Diffstat (limited to 'regexec.c')
-rw-r--r-- | regexec.c | 6 |
1 files changed, 0 insertions, 6 deletions
@@ -2054,12 +2054,6 @@ S_regtry(pTHX_ regexp *prog, char *startpos) New(22,PL_reg_start_tmp, PL_reg_start_tmpl, char*); } -#ifdef DEBUGGING - sv_setpvn(PERL_DEBUG_PAD(0), "", 0); - sv_setpvn(PERL_DEBUG_PAD(1), "", 0); - sv_setpvn(PERL_DEBUG_PAD(2), "", 0); -#endif - /* XXXX What this code is doing here?!!! There should be no need to do this again and again, PL_reglastparen should take care of this! --ilya*/ |