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

check for problems in bignums.

Browse Source
This commit is contained in:
Vítor Santos Costa 2011-06-21 15:08:58 +01:00
parent f6133f70b1
commit 7e7bc06d07
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
C/heapgc.c
View File

@ -1323,6 +1323,11 @@ mark_variable(CELL_PTR current USES_REGS)
LOCAL_total_marked += 2+sz; LOCAL_total_marked += 2+sz;
PUSH_POINTER(next PASS_REGS); PUSH_POINTER(next PASS_REGS);
sz++; sz++;
#if DEBUG
if (next[sz] != EndSpecials) {
fprintf(stderr,"[ Error: could not find EndSpecials at blob %p type %lx ]\n", next, next[1]);
}
#endif
MARK(next+sz); MARK(next+sz);
PUSH_POINTER(next+sz PASS_REGS); PUSH_POINTER(next+sz PASS_REGS);
} }