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/packages/PLStream/pl-yap.c
+++ b/packages/PLStream/pl-yap.c
@@ -517,8 +517,9 @@ currentOperator(Module m, atom_t name, int kind, int *type, int *priority)
  default:
    opkind = 1;
  }
-  if (!YAP_OpInfo(YAP_AtomFromSWIAtom(name), mod, opkind, &yap_type, priority))
+  if (!YAP_OpInfo(YAP_AtomFromSWIAtom(name), mod, opkind, &yap_type, priority)) {
    return FALSE;
+  }
  switch(yap_type) {
  case 1:
    *type = OP_XFX;