diff options
author | David Mitchell <davem@iabyn.com> | 2012-04-01 13:22:14 +0100 |
---|---|---|
committer | David Mitchell <davem@iabyn.com> | 2012-06-13 13:32:51 +0100 |
commit | 5f616ea71479dec56520bc87978dd87ad7478dae (patch) | |
tree | 15033cd9e6557b053fe9c33cc44e40e82a0b29a6 /regexp.h | |
parent | f59909ab8dad6ceb1b77e37e3c84e0c43fa33064 (diff) | |
download | perl-5f616ea71479dec56520bc87978dd87ad7478dae.tar.gz |
eliminate RExC_seen_evals and RExC_rx->seen_evals
these were used as part of the old "use re 'eval'" security
mechanism used by the now-eliminated PL_reginterp_cnt
Diffstat (limited to 'regexp.h')
-rw-r--r-- | regexp.h | 3 |
1 files changed, 0 insertions, 3 deletions
@@ -118,8 +118,6 @@ struct reg_code_block { /* Information about the match that isn't often used */ \ /* offset from wrapped to the start of precomp */ \ PERL_BITFIELD32 pre_prefix:4; \ - /* number of eval groups in the pattern - for security checks */\ - PERL_BITFIELD32 seen_evals:28; \ CV *qr_anoncv /* the anon sub wrapped round qr/(?{..})/ */ typedef struct regexp { @@ -492,7 +490,6 @@ get_regex_charset_name(const U32 flags, STRLEN* const lenp) #define RX_GOFS(prog) (((struct regexp *)SvANY(prog))->gofs) #define RX_LASTPAREN(prog) (((struct regexp *)SvANY(prog))->lastparen) #define RX_LASTCLOSEPAREN(prog) (((struct regexp *)SvANY(prog))->lastcloseparen) -#define RX_SEEN_EVALS(prog) (((struct regexp *)SvANY(prog))->seen_evals) #define RX_SAVED_COPY(prog) (((struct regexp *)SvANY(prog))->saved_copy) #endif /* PLUGGABLE_RE_EXTENSION */ |