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

Plus extra parentheses.

p4raw-id: //depot/perl@10772

op.h

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