diff options
Diffstat (limited to 'lgc.c')
| -rw-r--r-- | lgc.c | 8 |
1 files changed, 4 insertions, 4 deletions
| @@ -832,7 +832,7 @@ static void GCTM (lua_State *L) { | |||
| 832 | lua_assert(!g->gcemergency); | 832 | lua_assert(!g->gcemergency); |
| 833 | setgcovalue(L, &v, udata2finalize(g)); | 833 | setgcovalue(L, &v, udata2finalize(g)); |
| 834 | tm = luaT_gettmbyobj(L, &v, TM_GC); | 834 | tm = luaT_gettmbyobj(L, &v, TM_GC); |
| 835 | if (tm != NULL && ttisfunction(tm)) { /* is there a finalizer? */ | 835 | if (ttisfunction(tm)) { /* is the finalizer a function? */ |
| 836 | int status; | 836 | int status; |
| 837 | lu_byte oldah = L->allowhook; | 837 | lu_byte oldah = L->allowhook; |
| 838 | int running = g->gcrunning; | 838 | int running = g->gcrunning; |
| @@ -850,9 +850,9 @@ static void GCTM (lua_State *L) { | |||
| 850 | const char *msg = (ttisstring(s2v(L->top - 1))) | 850 | const char *msg = (ttisstring(s2v(L->top - 1))) |
| 851 | ? svalue(s2v(L->top - 1)) | 851 | ? svalue(s2v(L->top - 1)) |
| 852 | : "error object is not a string"; | 852 | : "error object is not a string"; |
| 853 | luaE_warning(L, "error in __gc metamethod ("); | 853 | luaE_warning(L, "error in __gc metamethod (", 1); |
| 854 | luaE_warning(L, msg); | 854 | luaE_warning(L, msg, 1); |
| 855 | luaE_warning(L, ")\n"); | 855 | luaE_warning(L, ")", 0); |
| 856 | } | 856 | } |
| 857 | } | 857 | } |
| 858 | } | 858 | } |
