bzero -> memset

Message-ID: <20010601120029.F29027@blackrider.blackstar.co.uk>

(But use Zero() instead of memset.)

p4raw-id: //depot/perl@10377

diff --git a/x2p/hash.c b/x2p/hash.c
index a266403..a2a4f6b 100644 (file)
--- a/x2p/hash.c
+++ b/x2p/hash.c
@@ -137,7 +137,7 @@ hsplit(HASH *tb)
     register HENT **oentry;
 
     a = (HENT**) saferealloc((char*)tb->tbl_array, newsize * sizeof(HENT*));
-    bzero((char*)&a[oldsize], oldsize * sizeof(HENT*)); /* zero second half */
+    Zero(&a[oldsize], oldsize, HENT*); /* zero second half */
     tb->tbl_max = --newsize;
     tb->tbl_array = a;
 
@@ -171,7 +171,7 @@ hnew(void)
     tb->tbl_fill = 0;
     tb->tbl_max = 7;
     hiterinit(tb);     /* so each() will start off right */
-    bzero((char*)tb->tbl_array, 8 * sizeof(HENT*));
+    Zero(tb->tbl_array, 8, sizeof(HENT*));
     return tb;
 }