fix bad lock

This commit is contained in:
Vitor Santos Costa 2009-03-13 11:49:38 +00:00
parent c9c097b32d
commit 8b118f1778

View File

@ -2649,7 +2649,7 @@ new_lu_int_key(Int key)
p->ArityOfPE = 3;
p->OpcodeOfPred = Yap_opcode(_op_fail);
p->cs.p_code.TrueCodeOfPred = p->CodeOfPred = FAILCODE;
WRITE_UNLOCK(ae->FRWLock);
WRITE_UNLOCK(ae->ARWLock);
INT_LU_KEYS[hash_key] = p0;
return p;
}