1 files changed, 5 insertions, 0 deletions
diff --git a/vutil.c b/vutil.c
index 5d183a0f29..2367489153 100644
--- a/vutil.c
+++ b/vutil.c
@@ -571,6 +571,11 @@ Perl_upg_version2(pTHX_ SV *ver, bool qv)
 Perl_upg_version(pTHX_ SV *ver, bool qv)
 #endif
 {
+
+#ifdef dVAR
+    dVAR;
+#endif
+
     const char *version, *s;
 #ifdef SvVOK
     const MAGIC *mg;