mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 03:40:34 +02:00
Code Activity

Use memset instead of bzero.

Browse source
This commit is contained in:
Keisuke Nishida 2001-04-12 01:40:21 +00:00
parent a58c0d5f51
commit f22ed5a028
5 changed files with 20 additions and 17 deletions
Download patch file Download diff file Expand all files Collapse all files

10
libguile/debug-malloc.c
View file

@ -116,10 +116,6 @@ static hash_entry_t *malloc_object = 0;
} \
while (0)
#ifdef MISSING_BZERO_DECL
extern void bzero (void *, size_t);
#endif
static void
grow (hash_entry_t **table, int *size)
{
@ -132,7 +128,7 @@ grow (hash_entry_t **table, int *size)
again:
TABLE (new) = realloc (TABLE (new),
sizeof (hash_entry_t) * (SIZE (new) + N_SEEK));
bzero (TABLE (new), sizeof (hash_entry_t) * (SIZE (new) + N_SEEK));
memset (TABLE (new), 0, sizeof (hash_entry_t) * (SIZE (new) + N_SEEK));
for (i = 0; i < oldsize; ++i)
if (oldtable[i].key)
{
@ -249,10 +245,10 @@ scm_debug_malloc_prehistory ()
{
malloc_type = malloc (sizeof (hash_entry_t)
* (malloc_type_size + N_SEEK));
bzero (malloc_type, sizeof (hash_entry_t) * (malloc_type_size + N_SEEK));
memset (malloc_type, 0, sizeof (hash_entry_t) * (malloc_type_size + N_SEEK));
malloc_object = malloc (sizeof (hash_entry_t)
* (malloc_object_size + N_SEEK));
bzero (malloc_object, sizeof (hash_entry_t) * (malloc_object_size + N_SEEK));
memset (malloc_object, 0, sizeof (hash_entry_t) * (malloc_object_size + N_SEEK));
}
void