In Perl_ptr_table_new(), fight back against the cult of Newxz().

(There's no need to zero-allocate memory for a structure when you're about to
explicitly allocate every member.)

1 files changed, 1 insertions, 1 deletions

diff --git a/sv.c b/sv.c
index 6212955651..dd51f9f5d4 100644
--- a/sv.c
+++ b/sv.c
@@ -10578,7 +10578,7 @@ Perl_ptr_table_new(pTHX)
     PTR_TBL_t *tbl;
     PERL_UNUSED_CONTEXT;
 
-    Newxz(tbl, 1, PTR_TBL_t);
+    Newx(tbl, 1, PTR_TBL_t);
     tbl->tbl_max	= 511;
     tbl->tbl_items	= 0;
     Newxz(tbl->tbl_ary, tbl->tbl_max + 1, PTR_TBL_ENT_t*);