|  | /* calloc -- allocate memory which has been initialized to zero. | 
|  | This function is in the public domain. */ | 
|  |  | 
|  | /* | 
|  |  | 
|  | @deftypefn Supplemental void* calloc (size_t @var{nelem}, size_t @var{elsize}) | 
|  |  | 
|  | Uses @code{malloc} to allocate storage for @var{nelem} objects of | 
|  | @var{elsize} bytes each, then zeros the memory. | 
|  |  | 
|  | @end deftypefn | 
|  |  | 
|  | */ | 
|  |  | 
|  | #include "ansidecl.h" | 
|  | #include <stddef.h> | 
|  |  | 
|  | /* For systems with larger pointers than ints, this must be declared.  */ | 
|  | void *malloc (size_t); | 
|  | void bzero (void *, size_t); | 
|  |  | 
|  | void * | 
|  | calloc (size_t nelem, size_t elsize) | 
|  | { | 
|  | register void *ptr; | 
|  |  | 
|  | if (nelem == 0 || elsize == 0) | 
|  | nelem = elsize = 1; | 
|  |  | 
|  | ptr = malloc (nelem * elsize); | 
|  | if (ptr) bzero (ptr, nelem * elsize); | 
|  |  | 
|  | return ptr; | 
|  | } |