From 8633b5394e9f1be292f2b13d5f642a205ae31509 Mon Sep 17 00:00:00 2001 From: David Mitchell Date: Wed, 26 Dec 2018 10:41:28 +0000 Subject: vutil.c: build under PERL_GLOBAL_STRUCT_PRIVATE The perl build option -DPERL_GLOBAL_STRUCT_PRIVATE had bit-rotted due to lack of smoking. This commit and the next fix it. I've separated out the vutil.c change into a separate commit since this file is actually part of the 'version' CPAN distribution and normally should be edited upstream first. --- vutil.c | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'vutil.c') 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; -- cgit v1.2.1