print3("memb = ", ftos(pawn.memb), "\n");
print3("Frame stand3 is ", ftos($stand3), " wooh\n");
};
+
+float() exprtest = {
+ local float x;
+ x = 3;
+ return (x); /* parens */
+}
parseerror(parser, "unmatched closing paren");
return false;
}
+ /* this would for bit a + (x) because there are no operators inside (x)
if (sy->ops[sy->ops_count-1].paren == 1) {
parseerror(parser, "empty parenthesis expression");
return false;
}
+ */
while (sy->ops_count) {
if (sy->ops[sy->ops_count-1].paren == 'f') {
if (!parser_close_call(parser, sy))
if (op->id == opid1('(')) {
if (wantop) {
- DEBUGSHUNTDO(printf("push (\n"));
+ DEBUGSHUNTDO(printf("push [op] (\n"));
++parens;
/* we expected an operator, this is the function-call operator */
if (!shunt_ops_add(&sy, syparen(parser_ctx(parser), 'f', sy.out_count-1))) {
parseerror(parser, "out of memory");
goto onerr;
}
- DEBUGSHUNTDO(printf("push (\n"));
+ DEBUGSHUNTDO(printf("push [nop] (\n"));
}
wantop = false;
} else {