small fixes:
- fix consult as reconsult - declaring P twice as thread_local confused yap - missing UNLOCK.
This commit is contained in:
parent
1db83cc30d
commit
05ac1dc920
@ -2020,7 +2020,7 @@ not_was_reconsulted(PredEntry *p, Term t, int mode)
|
|||||||
}
|
}
|
||||||
if (fp != LOCAL_ConsultBase) {
|
if (fp != LOCAL_ConsultBase) {
|
||||||
return FALSE;
|
return FALSE;
|
||||||
} else if (!mode) { // consulting again a predicate in the original file.
|
} else if (mode) { // consulting again a predicate in the original file.
|
||||||
if ((p->cs.p_code.NOfClauses &&
|
if ((p->cs.p_code.NOfClauses &&
|
||||||
p->src.OwnerFile == Yap_ConsultingFile( PASS_REGS1 ) &&
|
p->src.OwnerFile == Yap_ConsultingFile( PASS_REGS1 ) &&
|
||||||
p->src.OwnerFile != AtomNil &&
|
p->src.OwnerFile != AtomNil &&
|
||||||
|
Reference in New Issue
Block a user