diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix overflow from within clause/2

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1149 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc
2004-09-30 19:51:54 +00:00
parent 6e0defe923
commit 8eb1d2f7b9
9 changed files with 212 additions and 101 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
C/alloc.c
View File

@@ -12,7 +12,7 @@
* Last rev: *
* mods: *
* comments: allocating space *
* version:$Id: alloc.c,v 1.59 2004-09-28 18:37:05 vsc Exp $ *
* version:$Id: alloc.c,v 1.60 2004-09-30 19:51:53 vsc Exp $ *
*************************************************************************/
#ifdef SCCS
static char SccsId[] = "%W% %G%";
@@ -308,8 +308,6 @@ AddToFreeList(BlockHeader *b)
*q = b;
}
static int vsc_count_b;
static void
FreeBlock(BlockHeader *b)
{
@@ -326,7 +324,6 @@ FreeBlock(BlockHeader *b)
/* sanity check */
sp = &(b->b_size) + (b->b_size & ~InUseFlag);
if (b == 0x8a04428) vsc_count_b++;
if (!(b->b_size & InUseFlag) || *sp != b->b_size) {
#if !SHORT_INTS
fprintf(stderr, "%% YAP INTERNAL ERROR: sanity check failed in FreeBlock %p %x %x\n",