This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix volatile declaration
authorKarl Williamson <public@khwilliamson.com>
Wed, 9 Nov 2011 15:54:23 +0000 (08:54 -0700)
committerKarl Williamson <public@khwilliamson.com>
Wed, 9 Nov 2011 16:04:34 +0000 (09:04 -0700)
Commit 24efd69ba77ba76cd714519dccee88f45820d8b4 introduced a VOL
declaration.  I thought I had tested this, but apparently not.  It needs
to apply to the pointee instead of the pointer.

regcomp.c

index 1d1bf27..991f251 100644 (file)
--- a/regcomp.c
+++ b/regcomp.c
@@ -4523,7 +4523,7 @@ Perl_re_compile(pTHX_ SV * const pattern, U32 orig_pm_flags)
     struct regexp *r;
     register regexp_internal *ri;
     STRLEN plen;
-    VOL char  *exp;
+    char* VOL exp;
     char* xend;
     regnode *scan;
     I32 flags;