| 1188 | |
| 1189 | |
| 1190 | static int test_then_block (LexState *ls) { |
| 1191 | /* test_then_block -> [IF | ELSEIF] cond THEN block */ |
| 1192 | int condexit; |
| 1193 | luaX_next(ls); /* skip IF or ELSEIF */ |
| 1194 | condexit = cond(ls); |
| 1195 | checknext(ls, TK_THEN); |
| 1196 | block(ls); /* `then' part */ |
| 1197 | return condexit; |
| 1198 | } |
| 1199 | |
| 1200 | |
| 1201 | static void ifstat (LexState *ls, int line) { |