d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

speeded up std_alloc()

Browse source
This commit is contained in:
ceriel 1990-11-12 13:56:38 +00:00
parent b089e0d7f8
commit 96d5009bef
1 changed files with 25 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

29
modules/src/alloc/std_alloc.c
View file

@ -3,9 +3,10 @@
* (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands. * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
* See the copyright notice in the ACK home directory, in the file "Copyright". * See the copyright notice in the ACK home directory, in the file "Copyright".
*/ */
/* st_alloc - get a structure from a free list. If no structures left, /* std_alloc - get a structure from a free list. If no structures left,
create new ones. create new ones.
The counterpart, st_free, is a macro, defined in alloc.h The counterpart, st_free, is a macro, defined in alloc.h
This is a counting version of st_alloc.
*/ */
#include "alloc.h" #include "alloc.h"
@ -17,6 +18,8 @@ std_alloc(phead, size, count, pcnt)
int *pcnt; int *pcnt;
{ {
register char *p; register char *p;
register long *q;
char *retval;
if (*phead == 0) { if (*phead == 0) {
while (count >= 1 && (p = malloc(size * count)) == 0) { while (count >= 1 && (p = malloc(size * count)) == 0) {
@ -35,7 +38,25 @@ std_alloc(phead, size, count, pcnt)
} }
else p = *phead; else p = *phead;
*phead = (char *) (((_PALLOC_) p)->_A_next); *phead = (char *) (((_PALLOC_) p)->_A_next);
p += size; retval = p;
while (size--) *--p = 0; q = (long *) p;
return p; while (size >= 8*sizeof(long)) {
*q++ = 0;
*q++ = 0;
*q++ = 0;
*q++ = 0;
*q++ = 0;
*q++ = 0;
*q++ = 0;
*q++ = 0;
size -= 8*sizeof(long);
}
while (size >= sizeof(long)) {
*q++ = 0;
size -= sizeof(long);
}
p = (char *) q;
while (size--) *p++ = 0;
return retval;
} }