summaryrefslogtreecommitdiff
path: root/hv.c
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2007-02-18 17:56:13 +0000
committerNicholas Clark <nick@ccl4.org>2007-02-18 17:56:13 +0000
commitce5d06123ae0253bf2e33033ffbfba16ce3bb79e (patch)
treebea2d0d5c1bf30c097544ae027fb92115e28363e /hv.c
parent5693d826577600a198e0f93a41f0ca319f85a889 (diff)
downloadperl-ce5d06123ae0253bf2e33033ffbfba16ce3bb79e.tar.gz
newHV doesn't need to turn off POK or NOK, as they will default to not
being set. p4raw-id: //depot/perl@30345
Diffstat (limited to 'hv.c')
-rw-r--r--hv.c3
1 files changed, 1 insertions, 2 deletions
diff --git a/hv.c b/hv.c
index ccc10df789..903d0b80ea 100644
--- a/hv.c
+++ b/hv.c
@@ -1401,8 +1401,7 @@ Perl_newHV(pTHX)
sv_upgrade((SV *)hv, SVt_PVHV);
xhv = (XPVHV*)SvANY(hv);
- SvPOK_off(hv);
- SvNOK_off(hv);
+ assert(!SvOK(hv));
#ifndef NODEFAULT_SHAREKEYS
HvSHAREKEYS_on(hv); /* key-sharing on by default */
#endif