Change 32759 by [EMAIL PROTECTED] on 2007/12/29 11:49:09
Note to future self about moving the regexp flag bits around.
Affected files ...
... //depot/perl/op.h#193 edit
... //depot/perl/regexp.h#116 edit
Differences ...
==== //depot/perl/op.h#193 (text) ====
Index: perl/op.h
--- perl/op.h#192~32707~ 2007-12-22 10:26:21.000000000 -0800
+++ perl/op.h 2007-12-29 03:49:09.000000000 -0800
@@ -367,7 +367,8 @@
#define PMf_EVAL 0x0400 /* evaluating replacement as expr */
/* The following flags have exact equivalents in regcomp.h with the prefix RXf_
- * which are stored in the regexp->extflags member.
+ * which are stored in the regexp->extflags member. If you change them here,
+ * you have to change them there, and vice versa.
*/
#define PMf_LOCALE 0x00800 /* use locale for character types */
#define PMf_MULTILINE 0x01000 /* assume multiple lines */
==== //depot/perl/regexp.h#116 (text) ====
Index: perl/regexp.h
--- perl/regexp.h#115~32758~ 2007-12-28 16:17:41.000000000 -0800
+++ perl/regexp.h 2007-12-29 03:49:09.000000000 -0800
@@ -245,7 +245,9 @@
#define RXf_WHITE 0x00000400 /* Pattern is /\s+/ */
#define RXf_NULL 0x40000000 /* Pattern is // */
-/* 0x1F800 of extflags is used by (RXf_)PMf_COMPILETIME */
+/* 0x1F800 of extflags is used by (RXf_)PMf_COMPILETIME
+ * If you change these you need to change the equivalent flags in op.h, and
+ * vice versa. */
#define RXf_PMf_LOCALE 0x00000800 /* use locale */
#define RXf_PMf_MULTILINE 0x00001000 /* /m */
#define RXf_PMf_SINGLELINE 0x00002000 /* /s */
End of Patch.
