xref: /csrg-svn/lib/libc/stdlib/calloc.c (revision 26543)
1*26543Sdonn #if defined(LIBC_SCCS) && !defined(lint)
2*26543Sdonn static char sccsid[] = "@(#)calloc.c	5.2 (Berkeley) 03/09/86";
3*26543Sdonn #endif LIBC_SCCS and not lint
41956Swnj 
517763Sserge /*
617763Sserge  * Calloc - allocate and clear memory block
717763Sserge  */
81956Swnj char *
91956Swnj calloc(num, size)
1017763Sserge 	register unsigned num, size;
111956Swnj {
1217763Sserge 	extern char *malloc();
1317763Sserge 	register char *p;
141956Swnj 
1517763Sserge 	size *= num;
1617763Sserge 	if (p = malloc(size))
1717763Sserge 		bzero(p, size);
1817763Sserge 	return (p);
191956Swnj }
201956Swnj 
211956Swnj cfree(p, num, size)
2217763Sserge 	char *p;
2317763Sserge 	unsigned num;
2417763Sserge 	unsigned size;
251956Swnj {
261956Swnj 	free(p);
271956Swnj }
28