diff options
| author | Nicholas Clark <nick@ccl4.org> | 2007-12-29 15:11:04 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2007-12-29 15:11:04 +0000 |
| commit | 14f3b9f2b06052c35a95062569fb2799771d1e2b (patch) | |
| tree | efcd2f9d5d32c632dcef20f56a1e4dfc8d6d6e96 /ext/re | |
| parent | c0bacbefa7e93e425666c0c5f655c48e3ae97edf (diff) | |
| download | perl-14f3b9f2b06052c35a95062569fb2799771d1e2b.tar.gz | |
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
Diffstat (limited to 'ext/re')
| -rw-r--r-- | ext/re/re.xs | 3 |
1 files changed, 2 insertions, 1 deletions
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) { |