l_noret luaG_runerror (lua_State *L, const char *fmt, ...) { va_list argp; va_start(argp, fmt); addinfo(L, luaO_pushvfstring(L, fmt, argp)); va_end(argp); luaG_errormsg(L); }
const char *luaO_pushfstring (lua_State *L, const char *fmt, ...) { const char *msg; va_list argp; va_start(argp, fmt); msg = luaO_pushvfstring(L, fmt, argp); va_end(argp); return msg; }
LuaStackObject LuaState::PushVFString(const char *fmt, va_list argp) { lua_State* L = LuaState_to_lua_State(this); lua_lock(L); luaC_checkGC(L); luaO_pushvfstring(L, fmt, argp); lua_unlock(L); return LuaStackObject(this, lua_gettop(LuaState_to_lua_State(this))); }
void luaG_runerror_ok (lua_State *L, const char *fmt, ...) { //logt("luaG_runerror"); va_list argp; va_start(argp, fmt); addinfo(L, luaO_pushvfstring(L, fmt, argp)); va_end(argp); luaG_errormsg(L); }
LUA_API const char *lua_pushvfstring (lua_State *L, const char *fmt, va_list argp) { const char *ret; lua_lock(L); luaC_checkGC(L); ret = luaO_pushvfstring(L, fmt, argp); lua_unlock(L); return ret; }
LUA_API const char *lua_pushfstring (lua_State *L, const char *fmt, ...) { const char *ret; va_list argp; lua_lock(L); luaC_checkGC(L); va_start(argp, fmt); ret = luaO_pushvfstring(L, fmt, argp); va_end(argp); lua_unlock(L); return ret; }
l_noret luaG_runerror (lua_State *L, const char *fmt, ...) { CallInfo *ci = L->ci; const char *msg; va_list argp; va_start(argp, fmt); msg = luaO_pushvfstring(L, fmt, argp); /* format message */ va_end(argp); if (isLua(ci)) /* if Lua function, add source:line information */ luaG_addinfo(L, msg, ci_func(ci)->p->source, currentline(ci)); luaG_errormsg(L); }
LuaStackObject LuaState::PushFString(const char *fmt, ...) { lua_State* L = m_state; va_list argp; lua_lock(L); luaC_checkGC(L); va_start(argp, fmt); luaO_pushvfstring(L, fmt, argp); va_end(argp); lua_unlock(L); return LuaStackObject(this, lua_gettop(m_state)); }
l_noret luaG_runerror (lua_State *L, const char *fmt, ...) { CallInfo *ci = L->ci; const char *msg; va_list argp; va_start(argp, fmt); msg = luaO_pushvfstring(L, fmt, argp); /* format message */ va_end(argp); if (isLua(ci)) /* if Lua function, add source:line information */ luaG_addinfo(L, msg, ci_func(ci)->p->source, currentline(ci)); #if LUA_TILDE_DEBUGGER if (L->hookmask & LUA_MASKERROR) luaD_hook(L, LUA_HOOKERROR, -1); #endif /* LUA_TILDE_DEBUGGER */ luaG_errormsg(L); }