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

make it so that we always use the fixed op for |. Needs improement.

Browse Source
This commit is contained in:
Vitor Santos Costa 2010-01-12 10:06:10 +00:00
parent e86a995dd2
commit 02108d2017
1 changed files with 3 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
C/parser.c
View File

@ -675,9 +675,8 @@ ParseTerm(int prio, JMPBUFF *FailBuff)
}
curprio = 1000;
continue;
} else if (Unsigned(Yap_tokptr->TokInfo) == '|' &&
IsInfixOp(AtomVBar, &opprio, &oplprio, &oprprio)
&& opprio <= prio && oplprio >= curprio) {
} else if (Unsigned(Yap_tokptr->TokInfo) == '|' &&
prio >= 1105 && curprio <= 1104) {
Volatile Term args[2];
NextToken;
args[0] = t;
@ -688,7 +687,7 @@ ParseTerm(int prio, JMPBUFF *FailBuff)
Yap_ErrorMessage = "Stack Overflow";
FAIL;
}
curprio = opprio;
curprio = 1105;
continue;
}
}