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:
vsc 2001-06-08 13:39:07 +00:00
parent 3206e6ca22
commit be02a4f6ab

View File

@ -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)