diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fixed compilation bug (Prof. Vitor Costa)

Browse Source
This commit is contained in:
Miguel Areias
2012-07-02 19:48:58 +01:00
parent fab462b002
commit bc21735ff1
3 changed files with 7 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

7
C/stdpreds.c
View File

@@ -3256,21 +3256,20 @@ cont_current_predicate_for_atom( USES_REGS1 )
}
p = RepPredProp(p->NextOfPE);
}
READ_UNLOCK(PredHashRWLock);
}
}
READ_UNLOCK(pp->FRWLock);
} else if (pp->KindOfPE == PEProp) {
PredEntry *pe = RepPredProp(pf);
READ_LOCK(pp->FRWLock);
PELOCK(31,pe);
if (pe->ModuleOfPred == mod ||
pe->ModuleOfPred == 0) {
/* we found the predicate */
EXTRA_CBACK_ARG(3,1) = MkIntegerTerm((Int)(pp->NextOfPE));
READ_UNLOCK(pp->FRWLock);
UNLOCKPE(31,pe);
return Yap_unify(ARG3,MkIntTerm(0));
}
READ_UNLOCK(pp->FRWLock);
UNLOCKPE(31,pe);
}
pf = pp->NextOfPE;
}