fix queues
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@208 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
parent
45a0bc7aef
commit
80e5fc7285
@ -3814,9 +3814,9 @@ p_init_queue(void)
|
|||||||
dbq->EntryTerm = MkAtomTerm(AbsAtom((AtomEntry *)dbq));
|
dbq->EntryTerm = MkAtomTerm(AbsAtom((AtomEntry *)dbq));
|
||||||
dbq->Flags = DBClMask;
|
dbq->Flags = DBClMask;
|
||||||
dbq->FirstInQueue = dbq->LastInQueue = NULL;
|
dbq->FirstInQueue = dbq->LastInQueue = NULL;
|
||||||
dbq->next = DBQueues;
|
|
||||||
dbq->prev = NULL;
|
dbq->prev = NULL;
|
||||||
}
|
}
|
||||||
|
dbq->next = DBQueues;
|
||||||
DBQueues = dbq;
|
DBQueues = dbq;
|
||||||
dbq->age = IntOfTerm(GetValue(AtomCatch));
|
dbq->age = IntOfTerm(GetValue(AtomCatch));
|
||||||
INIT_RWLOCK(dbq->QRWLock);
|
INIT_RWLOCK(dbq->QRWLock);
|
||||||
|
Reference in New Issue
Block a user