mirror of
https://github.com/SEPPDROID/Digital-Research-Source-Code.git
synced 2025-10-23 00:14:25 +00:00
31 lines
750 B
C
31 lines
750 B
C
/********************************************************************
|
|
*
|
|
* calloc.c - memory allocator for sets of elements
|
|
*
|
|
* BYTE *calloc(nelem,sizelem)
|
|
* WORD nelem, sizelem
|
|
*
|
|
* Returns a pointer to a region of (zero filled) memory large
|
|
* enough to hold 'nelem' items each of size 'sizelem'.
|
|
* Returns NULL if not enough memory.
|
|
*
|
|
*********************************************************************/
|
|
|
|
#include <portab.h>
|
|
#include <cpm.h>
|
|
|
|
BYTE *calloc(ne,se)
|
|
REG WORD ne, /* number of elements */
|
|
se; /* size of element */
|
|
{
|
|
REG WORD rs; /* region size to be allocated */
|
|
REG BYTE *rp; /* pointer to region */
|
|
BYTE *malloc();
|
|
|
|
if( (rp=malloc(rs =(se*ne))) == NULL)
|
|
return(NULL);
|
|
for( ; rs > 0; )
|
|
rp[--rs]=ZERO;
|
|
return(rp);
|
|
}
|