diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2006-03-24 23:21:52 +0000 |
|---|---|---|
| committer | Dave Mitchell <davem@fdisolutions.com> | 2006-03-24 23:21:52 +0000 |
| commit | 35ade292f2ece2926aa263efd6269babc55a7f74 (patch) | |
| tree | a87f4e87881dd0186814da291945de77604aabf7 | |
| parent | 95b244405438253236d34c3edcbd0892a86c2dd1 (diff) | |
| download | perl-35ade292f2ece2926aa263efd6269babc55a7f74.tar.gz | |
remove unused PL_regcc variable
p4raw-id: //depot/perl@27599
| -rw-r--r-- | embedvar.h | 2 | ||||
| -rw-r--r-- | perlapi.h | 2 | ||||
| -rw-r--r-- | regcomp.c | 1 | ||||
| -rw-r--r-- | sv.c | 1 | ||||
| -rw-r--r-- | thrdvar.h | 1 |
5 files changed, 0 insertions, 7 deletions
diff --git a/embedvar.h b/embedvar.h index a688c36b12..50bb2c380f 100644 --- a/embedvar.h +++ b/embedvar.h @@ -104,7 +104,6 @@ #define PL_reg_starttry (vTHX->Treg_starttry) #define PL_reg_sv (vTHX->Treg_sv) #define PL_regbol (vTHX->Tregbol) -#define PL_regcc (vTHX->Tregcc) #define PL_regcompp (vTHX->Tregcompp) #define PL_regdata (vTHX->Tregdata) #define PL_regdummy (vTHX->Tregdummy) @@ -814,7 +813,6 @@ #define PL_Treg_starttry PL_reg_starttry #define PL_Treg_sv PL_reg_sv #define PL_Tregbol PL_regbol -#define PL_Tregcc PL_regcc #define PL_Tregcompp PL_regcompp #define PL_Tregdata PL_regdata #define PL_Tregdummy PL_regdummy @@ -830,8 +830,6 @@ END_EXTERN_C #define PL_reg_sv (*Perl_Treg_sv_ptr(aTHX)) #undef PL_regbol #define PL_regbol (*Perl_Tregbol_ptr(aTHX)) -#undef PL_regcc -#define PL_regcc (*Perl_Tregcc_ptr(aTHX)) #undef PL_regcompp #define PL_regcompp (*Perl_Tregcompp_ptr(aTHX)) #undef PL_regdata @@ -6199,7 +6199,6 @@ Perl_save_re_context(pTHX) SAVEI32(PL_regnarrate); /* from regexec.c */ SAVEVPTR(PL_regprogram); /* from regexec.c */ SAVEINT(PL_regindent); /* from regexec.c */ - SAVEVPTR(PL_regcc); /* from regexec.c */ SAVEVPTR(PL_curcop); SAVEVPTR(PL_reg_call_cc); /* from regexec.c */ SAVEVPTR(PL_reg_re); /* from regexec.c */ @@ -11437,7 +11437,6 @@ perl_clone_using(PerlInterpreter *proto_perl, UV flags, PL_regnarrate = 0; PL_regprogram = (regnode*)NULL; PL_regindent = 0; - PL_regcc = (CURCUR*)NULL; PL_reg_call_cc = (struct re_cc_state*)NULL; PL_reg_re = (regexp*)NULL; PL_reg_ganch = NULL; @@ -183,7 +183,6 @@ PERLVAR(Treg_eval_set, I32) /* from regexec.c */ PERLVAR(Tregnarrate, I32) /* from regexec.c */ PERLVAR(Tregprogram, regnode *) /* from regexec.c */ PERLVARI(Tregindent, int, 0) /* from regexec.c */ -PERLVAR(Tregcc, CURCUR *) /* from regexec.c */ PERLVAR(Treg_call_cc, struct re_cc_state *) /* from regexec.c */ PERLVAR(Treg_re, regexp *) /* from regexec.c */ PERLVAR(Treg_ganch, char *) /* position of \G */ |