diff options
Diffstat (limited to 'ldo.c')
-rw-r--r-- | ldo.c | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ldo.c,v 1.130 2001/03/02 17:27:50 roberto Exp roberto $ | 2 | ** $Id: ldo.c,v 1.131 2001/03/07 18:09:25 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 | */ |
@@ -10,6 +10,7 @@ | |||
10 | #include <stdlib.h> | 10 | #include <stdlib.h> |
11 | #include <string.h> | 11 | #include <string.h> |
12 | 12 | ||
13 | #define LUA_PRIVATE | ||
13 | #include "lua.h" | 14 | #include "lua.h" |
14 | 15 | ||
15 | #include "ldebug.h" | 16 | #include "ldebug.h" |
@@ -328,7 +329,7 @@ struct lua_longjmp { | |||
328 | 329 | ||
329 | 330 | ||
330 | static void message (lua_State *L, const l_char *s) { | 331 | static void message (lua_State *L, const l_char *s) { |
331 | luaV_getglobal(L, luaS_newliteral(L, LUA_ERRORMESSAGE), L->top); | 332 | luaV_getglobal(L, luaS_newliteral(L, l_s(LUA_ERRORMESSAGE)), L->top); |
332 | if (ttype(L->top) == LUA_TFUNCTION) { | 333 | if (ttype(L->top) == LUA_TFUNCTION) { |
333 | incr_top; | 334 | incr_top; |
334 | setsvalue(L->top, luaS_new(L, s)); | 335 | setsvalue(L->top, luaS_new(L, s)); |