X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FScope-Upper.git;a=blobdiff_plain;f=Upper.xs;h=2e2c2a523ab1d5de8b6c7ae710c6221a8333d6a0;hp=5b0685d97502efdab9caa4a15d4c958615757ccf;hb=27ba97969c588eeee7456ac7b0f8e87166abeee6;hpb=3c079786e605cba895e2d8015a95be09eb45743b

diff --git a/Upper.xs b/Upper.xs
index 5b0685d..2e2c2a5 100644
--- a/Upper.xs
+++ b/Upper.xs
@@ -2221,7 +2221,7 @@ static I32 su_context_gimme(pTHX_ I32 cxix) {
 
 /* --- Global setup/teardown ----------------------------------------------- */
 
-static U32 su_initialized = 0;
+static VOL U32 su_initialized = 0;
 
 static void su_global_teardown(pTHX_ void *root) {
  if (!su_initialized)