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 | } |