diff options
Diffstat (limited to '')
| -rw-r--r-- | ldebug.c | 8 |
1 files changed, 2 insertions, 6 deletions
| @@ -852,12 +852,8 @@ l_noret luaG_runerror (lua_State *L, const char *fmt, ...) { | |||
| 852 | const char *msg; | 852 | const char *msg; |
| 853 | va_list argp; | 853 | va_list argp; |
| 854 | luaC_checkGC(L); /* error message uses memory */ | 854 | luaC_checkGC(L); /* error message uses memory */ |
| 855 | va_start(argp, fmt); | 855 | pushvfstring(L, argp, fmt, msg); |
| 856 | msg = luaO_pushvfstring(L, fmt, argp); /* format message */ | 856 | if (isLua(ci)) { /* Lua function? */ |
| 857 | va_end(argp); | ||
| 858 | if (msg == NULL) /* no memory to format message? */ | ||
| 859 | luaD_throw(L, LUA_ERRMEM); | ||
| 860 | else if (isLua(ci)) { /* Lua function? */ | ||
| 861 | /* add source:line information */ | 857 | /* add source:line information */ |
| 862 | luaG_addinfo(L, msg, ci_func(ci)->p->source, getcurrentline(ci)); | 858 | luaG_addinfo(L, msg, ci_func(ci)->p->source, getcurrentline(ci)); |
| 863 | setobjs2s(L, L->top.p - 2, L->top.p - 1); /* remove 'msg' */ | 859 | setobjs2s(L, L->top.p - 2, L->top.p - 1); /* remove 'msg' */ |
