X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Findirect.git;a=blobdiff_plain;f=indirect.xs;fp=indirect.xs;h=fd742ebf9cac5c72a1402df39a04e544b8d2a80c;hp=40aebea36f97c0d56e583f19220bdf70bfc58c13;hb=b5c134ab71c3f931cc2c9b55eb69b44ced87e46e;hpb=9d97dcd6b7e20f9d3e3313a5d8436b7d5dedbc0c

diff --git a/indirect.xs b/indirect.xs
index 40aebea..fd742eb 100644
--- a/indirect.xs
+++ b/indirect.xs
@@ -468,7 +468,7 @@ static SV *indirect_detag(pTHX_ const SV *hint) {
  return I_HINT_CODE(h);
 }
 
-static U32 indirect_hash = 0;
+static VOL U32 indirect_hash = 0;
 
 static SV *indirect_hint(pTHX) {
 #define indirect_hint() indirect_hint(aTHX)
@@ -935,7 +935,7 @@ done:
 
 /* --- Global setup/teardown ------------------------------------------------ */
 
-static U32 indirect_initialized = 0;
+static VOL U32 indirect_initialized = 0;
 
 static void indirect_global_teardown(pTHX_ void *root) {
  if (!indirect_initialized)