Function undefgoto

freebsd/contrib/openzfs/module/lua/lparser.c:461–467

** generates an error for an undefined 'goto'; choose appropriate ** message when label name is a reserved word (which can only be 'break') */

** message when label name is a reserved word (which can only be 'break')
*/
static l_noret undefgoto (LexState *ls, Labeldesc *gt) {
  const char *msg = isreserved(gt->name)
                    ? "<%s> at line %d not inside a loop"
                    : "no visible label " LUA_QS " for <goto> at line %d";
  msg = luaO_pushfstring(ls->L, msg, getstr(gt->name), gt->line);
  semerror(ls, msg);
}


static void leaveblock (FuncState *fs) {