summaryrefslogtreecommitdiff
path: root/regexp.h
diff options
context:
space:
mode:
authorDave Mitchell <davem@fdisolutions.com>2006-09-24 22:31:59 +0000
committerDave Mitchell <davem@fdisolutions.com>2006-09-24 22:31:59 +0000
commitfaec1544a062a64ce2cc9a557a1d8f35ddbe6c18 (patch)
treedfdb2c5c5c25ef5f5c37f1d2e800e53dacb022ac /regexp.h
parentb8591aeeccd18e5b09e0b106c07d24d0389b37fc (diff)
downloadperl-faec1544a062a64ce2cc9a557a1d8f35ddbe6c18.tar.gz
fix regression introduced in #27778: must backtrack into inner regex
"aa" =~ /(??{"a+"})a/ p4raw-id: //depot/perl@28884
Diffstat (limited to 'regexp.h')
-rw-r--r--regexp.h6
1 files changed, 5 insertions, 1 deletions
diff --git a/regexp.h b/regexp.h
index 7f82199c10..36b2f7fef5 100644
--- a/regexp.h
+++ b/regexp.h
@@ -219,8 +219,12 @@ typedef struct regmatch_state {
struct {
/* this first element must match u.yes */
struct regmatch_state *prev_yes_state;
+ struct regmatch_state *prev_eval;
+ struct regmatch_state *prev_curlyx;
regexp *prev_rex;
- int toggleutf;
+ U32 toggle_reg_flags; /* what bits in PL_reg_flags to
+ flip when transitioning between
+ inner and outer rexen */
CHECKPOINT cp; /* remember current savestack indexes */
CHECKPOINT lastcp;
regnode *B; /* the node following us */