DepFr_cons field initialization for threads

This commit is contained in:
Ricardo Rocha
2011-07-26 16:49:49 +01:00
parent 3345709bdb
commit efc59cf8d6
4 changed files with 16 additions and 3 deletions

View File

@@ -3225,7 +3225,7 @@ compact_heap( USES_REGS1 )
*/
#ifdef TABLING
if (depfr != NULL && gc_B >= DepFr_cons_cp(depfr)) {
if (depfr && gc_B >= DepFr_cons_cp(depfr)) {
gc_B = DepFr_cons_cp(depfr);
depfr = DepFr_next(depfr);
}
@@ -3408,7 +3408,7 @@ icompact_heap( USES_REGS1 )
*/
#ifdef TABLING
if (depfr != NULL && gc_B >= DepFr_cons_cp(depfr)) {
if (depfr && gc_B >= DepFr_cons_cp(depfr)) {
gc_B = DepFr_cons_cp(depfr);
depfr = DepFr_next(depfr);
}