summaryrefslogtreecommitdiff
path: root/vutil.c
diff options
context:
space:
mode:
authorJohn Peacock <jpeacock@cpan.org>2017-04-24 20:06:01 -0400
committerJames E Keenan <jkeenan@cpan.org>2017-06-01 09:12:11 -0400
commitdddb22758b5060ae9de978fbb03317185af97b24 (patch)
treeb29bc938d145242ceda016a20b338fbaa0e31abc /vutil.c
parent53fdf12aede2fd58b0c5ee236a58025184f49def (diff)
downloadperl-dddb22758b5060ae9de978fbb03317185af97b24.tar.gz
Update core with version 0.9918
Diffstat (limited to 'vutil.c')
-rw-r--r--vutil.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/vutil.c b/vutil.c
index bd51707ca4..c033820fa5 100644
--- a/vutil.c
+++ b/vutil.c
@@ -968,7 +968,11 @@ Perl_vstringify(pTHX_ SV *vs)
if (svp) {
SV *pv;
pv = *svp;
- if ( SvPOK(pv) )
+ if ( SvPOK(pv)
+#if PERL_VERSION_LT(5,17,2)
+ || SvPOKp(pv)
+#endif
+ )
return newSVsv(pv);
else
return &PL_sv_undef;