| 993 | |
| 994 | |
| 995 | static void whilestat (LexState *ls, int line) { |
| 996 | /* whilestat -> WHILE cond DO block END */ |
| 997 | FuncState *fs = ls->fs; |
| 998 | int whileinit; |
| 999 | int condexit; |
| 1000 | BlockCnt bl; |
| 1001 | luaX_next(ls); /* skip WHILE */ |
| 1002 | whileinit = luaK_getlabel(fs); |
| 1003 | condexit = cond(ls); |
| 1004 | enterblock(fs, &bl, 1); |
| 1005 | checknext(ls, TK_DO); |
| 1006 | block(ls); |
| 1007 | luaK_patchlist(fs, luaK_jump(fs), whileinit); |
| 1008 | check_match(ls, TK_END, TK_WHILE, line); |
| 1009 | leaveblock(fs); |
| 1010 | luaK_patchtohere(fs, condexit); /* false conditions finish the loop */ |
| 1011 | } |
| 1012 | |
| 1013 | |
| 1014 | static void repeatstat (LexState *ls, int line) { |
no test coverage detected