make sure we walk every clause when doing restore mega_clause.

This commit is contained in:
Vitor Santos Costa
2009-11-02 12:46:39 +00:00
parent 021141188f
commit a628079e00
6 changed files with 27 additions and 14 deletions

View File

@@ -836,7 +836,7 @@ Yap_BuildMegaClause(PredEntry *ap)
memcpy((void *)ptr, (void *)cl->ClCode, sz);
if (has_blobs) {
ClDiff = (char *)(ptr)-(char *)cl->ClCode;
restore_opcodes(ptr);
restore_opcodes(ptr, NULL);
}
ptr = (yamop *)((char *)ptr + sz);
if (cl->ClCode == ap->cs.p_code.LastClause)