fix missing lock in OpInfo

2011-03-01 10:32:25 +00:00
parent cce6bb6354
commit 0e447436b3
2 changed files with 3 additions and 1 deletions
--- a/C/c_interface.c
+++ b/C/c_interface.c
@@ -3597,6 +3597,7 @@ int YAP_OpInfo(Atom at, Term module, int opkind, int *yap_type, int *prio)
    }
  }
  *yap_type = n;
+  WRITE_UNLOCK(ae->ARWLock);
  return 1;
 }