** check whether current token is in the follow set of a block. ** 'until' closes syntactical blocks, but do not close scope, ** so it is handled in separate. */
| 586 | ** so it is handled in separate. |
| 587 | */ |
| 588 | static int block_follow (LexState *ls, int withuntil) { |
| 589 | switch (ls->t.token) { |
| 590 | case TK_ELSE: case TK_ELSEIF: |
| 591 | case TK_END: case TK_EOS: |
| 592 | return 1; |
| 593 | case TK_UNTIL: return withuntil; |
| 594 | default: return 0; |
| 595 | } |
| 596 | } |
| 597 | |
| 598 | |
| 599 | static void statlist (LexState *ls) { |
no outgoing calls