support for ',' in for statements.
git-svn-id: https://svn.code.sf.net/p/fteqw/code/trunk@431 fc73d0e0-1445-4013-8a0c-d673dee63da5
This commit is contained in:
parent
939eb98abf
commit
ab9f3d637d
1 changed files with 13 additions and 2 deletions
|
@ -4422,7 +4422,10 @@ void QCC_PR_ParseStatement (void)
|
|||
QCC_PR_Expect("(");
|
||||
if (!QCC_PR_Check(";"))
|
||||
{
|
||||
QCC_FreeTemp(QCC_PR_Expression(TOP_PRIORITY));
|
||||
do
|
||||
{
|
||||
QCC_FreeTemp(QCC_PR_Expression(TOP_PRIORITY));
|
||||
} while (QCC_PR_Check(","));
|
||||
QCC_PR_Expect(";");
|
||||
}
|
||||
|
||||
|
@ -4431,6 +4434,10 @@ void QCC_PR_ParseStatement (void)
|
|||
{
|
||||
conditional = true;
|
||||
e = QCC_PR_Expression(TOP_PRIORITY);
|
||||
while (QCC_PR_Check(",")) //logicops, string ops?
|
||||
{
|
||||
e = QCC_PR_Statement(pr_opcodes+OP_AND, e, QCC_PR_Expression(TOP_PRIORITY), NULL);
|
||||
}
|
||||
conditional = false;
|
||||
QCC_PR_Expect(";");
|
||||
}
|
||||
|
@ -4440,7 +4447,11 @@ void QCC_PR_ParseStatement (void)
|
|||
if (!QCC_PR_Check(")"))
|
||||
{
|
||||
old_numstatements = numstatements;
|
||||
QCC_FreeTemp(QCC_PR_Expression(TOP_PRIORITY));
|
||||
do
|
||||
{
|
||||
QCC_FreeTemp(QCC_PR_Expression(TOP_PRIORITY));
|
||||
} while (QCC_PR_Check(","));
|
||||
|
||||
numtemp = numstatements - old_numstatements;
|
||||
if (numtemp > sizeof(linenum)/sizeof(linenum[0]))
|
||||
QCC_PR_ParseError(ERR_TOOCOMPLEX, "Update expression too large");
|
||||
|
|
Loading…
Reference in a new issue