diff options
Diffstat (limited to 'ldo.c')
| -rw-r--r-- | ldo.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ldo.c,v 1.111 2000/12/28 12:55:41 roberto Exp roberto $ | 2 | ** $Id: ldo.c,v 1.112 2001/01/10 16:58:11 roberto Exp roberto $ |
| 3 | ** Stack and Call structure of Lua | 3 | ** Stack and Call structure of Lua |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -332,7 +332,7 @@ struct lua_longjmp { | |||
| 332 | 332 | ||
| 333 | 333 | ||
| 334 | static void message (lua_State *L, const char *s) { | 334 | static void message (lua_State *L, const char *s) { |
| 335 | const TObject *em = luaH_getglobal(L, LUA_ERRORMESSAGE); | 335 | const TObject *em = luaH_getstr(L->gt, luaS_newliteral(L, LUA_ERRORMESSAGE)); |
| 336 | if (ttype(em) == LUA_TFUNCTION) { | 336 | if (ttype(em) == LUA_TFUNCTION) { |
| 337 | *L->top = *em; | 337 | *L->top = *em; |
| 338 | incr_top; | 338 | incr_top; |
