Function statement

Source/Misc/lua/src/lua.c:8847–8898

static int statement (LexState *ls) {
int line = ls->linenumber;  /* may be needed for error messages */
switch (ls->t.token) {
case TK_IF: {  /* stat -> ifstat */
ifstat(ls, line);
return 0;
}
case TK_WHILE: {  /* stat -> whilestat */
whilestat(ls, line);
return 0;
}
case TK_DO: {  /* stat -> DO block END */
luaX_next(ls);  /* skip DO */
block(ls);
check_match(ls, TK_END, TK_DO, line);
return 0;
}
case TK_FOR: {  /* stat -> forstat */
forstat(ls, line);
return 0;
}
case TK_REPEAT: {  /* stat -> repeatstat */
repeatstat(ls, line);
return 0;
}
case TK_FUNCTION: {
funcstat(ls, line);  /* stat -> funcstat */
return 0;
}
case TK_LOCAL: {  /* stat -> localstat */
luaX_next(ls);  /* skip LOCAL */
if (testnext(ls, TK_FUNCTION))  /* local function? */
localfunc(ls);
else
localstat(ls);
return 0;
}
case TK_RETURN: {  /* stat -> retstat */
retstat(ls);
return 1;  /* must be last statement */
}
case TK_BREAK: {  /* stat -> breakstat */
luaX_next(ls);  /* skip BREAK */
breakstat(ls);
return 1;  /* must be last statement */
}
default: {
exprstat(ls);
return 0;  /* to avoid warnings */
}
}
}


static void chunk (LexState *ls) {