fix current_op(X,Y,Z): it would not check for end of table.

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1039 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2004-04-16 21:01:45 +00:00
parent d2a4490676
commit 572690acd8

View File

@ -1971,7 +1971,7 @@ cont_current_op(void)
do { do {
if ((a = at->NextOfAE) == NIL) { if ((a = at->NextOfAE) == NIL) {
i++; i++;
while (TRUE) { while (i < AtomHashTableSize) {
READ_LOCK(HashChain[i].AERWLock); READ_LOCK(HashChain[i].AERWLock);
a = HashChain[i].Entry; a = HashChain[i].Entry;
READ_UNLOCK(HashChain[i].AERWLock); READ_UNLOCK(HashChain[i].AERWLock);