diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2001-03-26 11:31:49 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2001-03-26 11:31:49 -0300 |
commit | dd3a63c205a97339d8c8aec3cd49941bc10ba45c (patch) | |
tree | 763c1701607ace52692c8566277c6c70c7895acd /ldo.c | |
parent | cb49b088b61b75b905663a58a2c545de1ffea13a (diff) | |
download | lua-dd3a63c205a97339d8c8aec3cd49941bc10ba45c.tar.gz lua-dd3a63c205a97339d8c8aec3cd49941bc10ba45c.tar.bz2 lua-dd3a63c205a97339d8c8aec3cd49941bc10ba45c.zip |
new way to handle `profiles'
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)); |