fix syntax error allowed by newer GCCs

git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@900 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
vsc 2003-10-14 21:17:32 +00:00
parent a32d37c753
commit 76160f72a8
1 changed files with 1 additions and 1 deletions

View File

@ -5477,9 +5477,9 @@ static void
remove_from_index(PredEntry *ap, path_stack_entry *sp, ClauseDef *cls, yamop *bg, yamop *lt) {
/* last clause to experiment with */
yamop *ipc = ap->cs.p_code.TrueCodeOfPred;
sp = init_block_stack(sp, ipc, ap);
UInt current_arity = 0;
sp = init_block_stack(sp, ipc, ap);
if (ap->cs.p_code.NOfClauses == 1) {
if (ap->PredFlags & IndexedPredFlag) {
Yap_RemoveIndexation(ap);