In Perl_re_op_compile, make a var volatile

This function includes a setjmp to allow for abort and retry if the
pattern getting compiled suddenly becomes UTF8. My recent changes to
it left one var generating the dreaded "warning: variable ‘pat’ might be
clobbered" warning. So declare it VOL to fix this.

1 files changed, 1 insertions, 1 deletions

diff --git a/regcomp.c b/regcomp.c
index c9e5aac7e6..9449288308 100644
--- a/regcomp.c
+++ b/regcomp.c
@@ -5030,7 +5030,7 @@ Perl_re_op_compile(pTHX_ SV * const pattern, OP *expr, U32 orig_pm_flags)
     I32 flags;
     I32 minlen = 0;
     U32 pm_flags;
-    SV *pat;
+    SV * VOL pat;
 
     /* these are all flags - maybe they should be turned
      * into a single int with different bit masks */