Wrap wrapped and wraplen from struct regexp in macros RW_WRAPPED() and

RX_WRAPLEN() to preserve source compatibility when they get moved
around.

p4raw-id: //depot/perl@32758

1 files changed, 3 insertions, 0 deletions

diff --git a/regexp.h b/regexp.h
index 37d92c5ccb..623a4bbb10 100644
--- a/regexp.h
+++ b/regexp.h
@@ -358,6 +358,9 @@ and check for NULL.
    writers? Specifically, the value 1 assumes that the wrapped version always
    has exactly one character at the end, a ')'. Will that always be true?  */
 #define RX_PRELEN(prog)			((prog)->wraplen - (prog)->pre_prefix - 1)
+#define RX_WRAPPED(prog)		((prog)->wrapped)
+#define RX_WRAPLEN(prog)		((prog)->wraplen)
+
 
 #endif /* PLUGGABLE_RE_EXTENSION */