diff options
| author | Nicholas Clark <nick@ccl4.org> | 2008-01-02 13:07:16 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2008-01-02 13:07:16 +0000 |
| commit | 84679df57ca0626f7fb35fc3038e2e142b97f8a4 (patch) | |
| tree | 4ef3a329847218958c92d61aa9e6d7c874c047dc /pp_ctl.c | |
| parent | 07bc277f32c1d7aff237dd3f55d558b5d4b93314 (diff) | |
| download | perl-84679df57ca0626f7fb35fc3038e2e142b97f8a4.tar.gz | |
Convert some "regexp" and "struct regexp" to REGEXP where they are
currently equivalent but will be wrong once the equivalence vanishes.
p4raw-id: //depot/perl@32803
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -77,7 +77,7 @@ PP(pp_regcomp) dSP; register PMOP *pm = (PMOP*)cLOGOP->op_other; SV *tmpstr; - regexp *re = NULL; + REGEXP *re = NULL; /* prevent recompiling under /o and ithreads. */ #if defined(USE_ITHREADS) @@ -3836,7 +3836,7 @@ PP(pp_leavegiven) /* Helper routines used by pp_smartmatch */ STATIC PMOP * -S_make_matcher(pTHX_ regexp *re) +S_make_matcher(pTHX_ REGEXP *re) { dVAR; PMOP *matcher = (PMOP *) newPMOP(OP_MATCH, OPf_WANT_SCALAR | OPf_STACKED); @@ -3889,7 +3889,7 @@ S_do_smartmatch(pTHX_ HV *seen_this, HV *seen_other) SV *e = TOPs; /* e is for 'expression' */ SV *d = TOPm1s; /* d is for 'default', as in PL_defgv */ SV *This, *Other; /* 'This' (and Other to match) to play with C++ */ - regexp *this_regex, *other_regex; + REGEXP *this_regex, *other_regex; # define NOT_EMPTY_PROTO(cv) (!SvPOK(cv) || SvCUR(cv) == 0) |