diff options
author | Nicholas Clark <nick@ccl4.org> | 2007-12-26 11:55:15 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2007-12-26 11:55:15 +0000 |
commit | b53eecb41cfe1ac98c147076b9df0047426f32f2 (patch) | |
tree | a7953eba245873ff0f8fd774f22273e68bd3eaa9 /pp.c | |
parent | c975a42590d4415cbde1dbf125978db0461d609f (diff) | |
download | perl-b53eecb41cfe1ac98c147076b9df0047426f32f2.tar.gz |
Swap SVt_RV and SVt_NV in the SV ordering.
p4raw-id: //depot/perl@32725
Diffstat (limited to 'pp.c')
-rw-r--r-- | pp.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -172,7 +172,7 @@ PP(pp_rv2gv) const char * const name = CopSTASHPV(PL_curcop); gv = newGVgen(name); } - if (SvTYPE(sv) < SVt_RV) + if (SvTYPE(sv) < SVt_RV || SvTYPE(sv) == SVt_NV) sv_upgrade(sv, SVt_RV); else if (SvPVX_const(sv)) { SvPV_free(sv); |