f51ee0a16d
Binutils has a "contrib" subdirectory - thus flattening cannot happen without renaming the upper level contrib directory in a first pass. Also, don't record this move and remove any keyword expansion.
40 lines
807 B
C
40 lines
807 B
C
/* 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"
|
|
#ifdef ANSI_PROTOTYPES
|
|
#include <stddef.h>
|
|
#else
|
|
#define size_t unsigned long
|
|
#endif
|
|
|
|
/* For systems with larger pointers than ints, this must be declared. */
|
|
PTR malloc PARAMS ((size_t));
|
|
void bzero PARAMS ((PTR, size_t));
|
|
|
|
PTR
|
|
calloc (nelem, elsize)
|
|
size_t nelem, elsize;
|
|
{
|
|
register PTR ptr;
|
|
|
|
if (nelem == 0 || elsize == 0)
|
|
nelem = elsize = 1;
|
|
|
|
ptr = malloc (nelem * elsize);
|
|
if (ptr) bzero (ptr, nelem * elsize);
|
|
|
|
return ptr;
|
|
}
|