Enable uvar magic when patchlevel >= 28419

diff --git a/Magic.xs b/Magic.xs
index 61f8f1f6dff0341adcf7dec042db9dd3bba3d8e5..85d7c85133e4df513efd0fddb77fee7e22758594 100644 (file)
--- a/Magic.xs
+++ b/Magic.xs
@@ -67,7 +67,8 @@
 # define MGf_LOCAL 0
 #endif
 
-#if PERL_API_VERSION_GE(5, 10, 0)
+/* uvar magic and Hash::Util::FieldHash were commited with p28419 */
+#if (VMG_PERL_PATCHLEVEL >= 28419) || (!VMG_PERL_PATCHLEVEL && PERL_VERSION_GE(5, 9, 4))
 # define VMG_UVAR 1
 #else
 # define VMG_UVAR 0