From 8b118f1778216655497328a35e256873764ead77 Mon Sep 17 00:00:00 2001
From: Vitor Santos Costa <vsc@dcc.fc.up.pt>
Date: Fri, 13 Mar 2009 11:49:38 +0000
Subject: [PATCH] fix bad lock

---
 C/dbase.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/C/dbase.c b/C/dbase.c
index 329d3adac..73d531875 100644
--- a/C/dbase.c
+++ b/C/dbase.c
@@ -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;
 }