Re: [PATCH] Step 1 of moving regexps to the pad
Artur Bergman [Thu, 21 Jun 2001 14:04:54 +0000 (16:04 +0200)]
Message-ID: <B757AF86.1842%artur@contiller.se>

p4raw-id: //depot/perl@10770

op.h

diff --git a/op.h b/op.h
index b8fc287..6c88fa5 100644 (file)
--- a/op.h
+++ b/op.h
@@ -245,6 +245,9 @@ struct pmop {
 #endif
 };
 
+#define PM_GETRE(o)     o->pmregexp
+#define PM_SETRE(o,r)   o->pmregexp = r
+
 #define PMdf_USED      0x01            /* pm has been used once already */
 #define PMdf_TAINTED   0x02            /* pm compiled from tainted pattern */
 #define PMdf_UTF8      0x04            /* pm compiled from utf8 data */