just planning for the future...
This commit is contained in:
parent
5c2e5c524b
commit
2a6869bf28
@ -1599,7 +1599,7 @@ static void
|
|||||||
mark_att_var(CELL *hp)
|
mark_att_var(CELL *hp)
|
||||||
{
|
{
|
||||||
attvar_record *top = (attvar_record *)Yap_GlobalBase;
|
attvar_record *top = (attvar_record *)Yap_GlobalBase;
|
||||||
int relpos = top-(attvar_record *)hp;
|
Int relpos = top-(attvar_record *)hp;
|
||||||
attvar_record *attv = top-relpos;
|
attvar_record *attv = top-relpos;
|
||||||
if (attv != (attvar_record *)hp)
|
if (attv != (attvar_record *)hp)
|
||||||
attv--;
|
attv--;
|
||||||
|
Reference in New Issue
Block a user