78 const char *luaX_token2str (LexState *ls, int token) {  in luaX_token2str()  argument
79   if (token < FIRST_RESERVED) {  in luaX_token2str()
80     lua_assert(token == cast(unsigned char, token));  in luaX_token2str()
81     return (iscntrl(token)) ? luaO_pushfstring(ls->L, "char(%d)", token) :  in luaX_token2str()
82                               luaO_pushfstring(ls->L, "%c", token);  in luaX_token2str()
85     return luaX_tokens[token-FIRST_RESERVED];  in luaX_token2str()
89 static const char *txtToken (LexState *ls, int token) {  in txtToken()  argument
90   switch (token) {  in txtToken()
97       return luaX_token2str(ls, token);  in txtToken()
102 void luaX_lexerror (LexState *ls, const char *msg, int token) {  in luaX_lexerror()  argument
106   if (token)  in luaX_lexerror()
107     luaO_pushfstring(ls->L, "%s near " LUA_QS, msg, txtToken(ls, token));  in luaX_lexerror()
113   luaX_lexerror(ls, msg, ls->t.token);  in luaX_syntaxerror()
143   ls->lookahead.token = TK_EOS;  /* no look-ahead token */  in luaX_setinput()
450   if (ls->lookahead.token != TK_EOS) {  /* is there a look-ahead token? */  in luaX_next()
452     ls->lookahead.token = TK_EOS;  /* and discharge it */  in luaX_next()
455     ls->t.token = llex(ls, &ls->t.seminfo);  /* read next token */  in luaX_next()
460   lua_assert(ls->lookahead.token == TK_EOS);  in luaX_lookahead()
461   ls->lookahead.token = llex(ls, &ls->lookahead.seminfo);  in luaX_lookahead()