summaryrefslogtreecommitdiff
path: root/regexp.h
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2012-10-11 08:37:44 -0700
committerFather Chrysostomos <sprout@cpan.org>2012-10-11 23:07:35 -0700
commit2ed8c61f1921fabddfeb2a099733b977cb66ae42 (patch)
tree6b64b2141d3be7474c1a05cbdea1419582fd6452 /regexp.h
parentcccd1425414e6518c1fc8b7bcaccfb119320c513 (diff)
downloadperl-2ed8c61f1921fabddfeb2a099733b977cb66ae42.tar.gz
RXf_MODIFIES_VARS
regcomp.c sets this new flag whenever regops that could modify $REGMARK or $REGERROR have been seen. pp_subst will use this to tell whether it should repeatedly stringify the replacement.
Diffstat (limited to 'regexp.h')
-rw-r--r--regexp.h2
1 files changed, 2 insertions, 0 deletions
diff --git a/regexp.h b/regexp.h
index 8f43d198f2..f631db9a2a 100644
--- a/regexp.h
+++ b/regexp.h
@@ -408,6 +408,8 @@ get_regex_charset_name(const U32 flags, STRLEN* const lenp)
#define RXf_INTUIT_TAIL (1<<(RXf_BASE_SHIFT+14))
#define RXf_USE_INTUIT (RXf_USE_INTUIT_NOML|RXf_USE_INTUIT_ML)
+#define RXf_MODIFIES_VARS (1<<(RXf_BASE_SHIFT+15))
+
/* Copy and tainted info */
#define RXf_COPY_DONE (1<<(RXf_BASE_SHIFT+16))