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

don't allow removeindex to remove own clause.

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@923 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2003-11-12 13:31:28 +00:00
parent 1ada44ab8e
commit a21b209436
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
C/dbase.c
View File

@ -3863,7 +3863,11 @@ EraseLogUpdCl(LogUpdClause *clau)
DBErasedList = clau; DBErasedList = clau;
} }
#endif #endif
/* we are holding a reference to the clause */
clau->ClRefCount++;
Yap_RemoveClauseFromIndex(clau->ClPred, clau->ClCode); Yap_RemoveClauseFromIndex(clau->ClPred, clau->ClCode);
/* release the extra reference */
clau->ClRefCount--;
} }
complete_lu_erase(clau); complete_lu_erase(clau);
} }