get rid of unnecessary casts
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@63 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
parent
3206e6ca22
commit
be02a4f6ab
@ -12,7 +12,7 @@
|
|||||||
* Last rev: *
|
* Last rev: *
|
||||||
* mods: *
|
* mods: *
|
||||||
* comments: allocating space *
|
* comments: allocating space *
|
||||||
* version:$Id: alloc.c,v 1.7 2001-05-21 20:00:05 vsc Exp $ *
|
* version:$Id: alloc.c,v 1.8 2001-06-08 13:39:07 vsc Exp $ *
|
||||||
*************************************************************************/
|
*************************************************************************/
|
||||||
#ifdef SCCS
|
#ifdef SCCS
|
||||||
static char SccsId[] = "%W% %G%";
|
static char SccsId[] = "%W% %G%";
|
||||||
@ -87,7 +87,7 @@ RemoveFromFreeList(BlockHeader *b)
|
|||||||
b->b_next_size = p;
|
b->b_next_size = p;
|
||||||
}
|
}
|
||||||
else {
|
else {
|
||||||
BlockHeader **q = (BlockHeader **) &FreeBlocks;
|
BlockHeader **q = &FreeBlocks;
|
||||||
|
|
||||||
while ((*q) != b)
|
while ((*q) != b)
|
||||||
q = &((*q)->b_next_size);
|
q = &((*q)->b_next_size);
|
||||||
@ -109,7 +109,7 @@ AddToFreeList(BlockHeader *b)
|
|||||||
YAP_SEG_SIZE *sp;
|
YAP_SEG_SIZE *sp;
|
||||||
|
|
||||||
/* insert on list of free blocks */
|
/* insert on list of free blocks */
|
||||||
q = (BlockHeader **) &FreeBlocks;
|
q = &FreeBlocks;
|
||||||
sp = &(b->b_size) + b->b_size;
|
sp = &(b->b_size) + b->b_size;
|
||||||
*sp = b->b_size;
|
*sp = b->b_size;
|
||||||
LOCK(HeapUsedLock);
|
LOCK(HeapUsedLock);
|
||||||
@ -182,7 +182,7 @@ GetBlock(unsigned int n)
|
|||||||
|
|
||||||
if (FreeBlocks == NIL)
|
if (FreeBlocks == NIL)
|
||||||
return (NIL);
|
return (NIL);
|
||||||
p = (BlockHeader **) &FreeBlocks;
|
p = &FreeBlocks;
|
||||||
while (((b = *p) != NIL) && b->b_size < n)
|
while (((b = *p) != NIL) && b->b_size < n)
|
||||||
p = &b->b_next_size;
|
p = &b->b_next_size;
|
||||||
if (b == NIL || b->b_size < n)
|
if (b == NIL || b->b_size < n)
|
||||||
|
Reference in New Issue
Block a user