From 14f3b9f2b06052c35a95062569fb2799771d1e2b Mon Sep 17 00:00:00 2001
From: Nicholas Clark <nick@ccl4.org>
Date: Sat, 29 Dec 2007 15:11:04 +0000
Subject: The position of the modifier flag bits is actually encoded by a right
 shift 12 in two places, so replace that magic number with a macro
 RXf_PMf_STD_PMMOD_SHIFT defined adjacent to the flags it interacts with.

p4raw-id: //depot/perl@32774
---
 ext/re/re.xs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'ext/re')

diff --git a/ext/re/re.xs b/ext/re/re.xs
index 94cb2f5be2..72e4a703c8 100644
--- a/ext/re/re.xs
+++ b/ext/re/re.xs
@@ -107,7 +107,8 @@ PPCODE:
 
             const char *fptr = INT_PAT_MODS;
             char ch;
-            U16 match_flags = (U16)((re->extflags & PMf_COMPILETIME) >> 12);
+            U16 match_flags = (U16)((re->extflags & PMf_COMPILETIME)
+				    >> RXf_PMf_STD_PMMOD_SHIFT);
 
             while((ch = *fptr++)) {
                 if(match_flags & 1) {
-- 
cgit v1.2.1