diff options
Diffstat (limited to 'ldblib.c')
-rw-r--r-- | ldblib.c | 16 |
1 files changed, 8 insertions, 8 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: ldblib.c,v 1.10 2000/01/19 12:00:45 roberto Exp roberto $ | 2 | ** $Id: ldblib.c,v 1.11 2000/03/03 14:58:26 roberto Exp roberto $ |
3 | ** Interface from Lua to its debug API | 3 | ** Interface from Lua to its debug API |
4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
5 | */ | 5 | */ |
@@ -42,7 +42,7 @@ static void settabso (lua_State *L, lua_Object t, const char *i, lua_Object v) { | |||
42 | 42 | ||
43 | 43 | ||
44 | static void getstack (lua_State *L) { | 44 | static void getstack (lua_State *L) { |
45 | lua_Dbgactreg ar; | 45 | lua_Debug ar; |
46 | if (!lua_getstack(L, luaL_check_int(L, 1), &ar)) /* level out of range? */ | 46 | if (!lua_getstack(L, luaL_check_int(L, 1), &ar)) /* level out of range? */ |
47 | return; | 47 | return; |
48 | else { | 48 | else { |
@@ -79,8 +79,8 @@ static void getstack (lua_State *L) { | |||
79 | 79 | ||
80 | 80 | ||
81 | static void getlocal (lua_State *L) { | 81 | static void getlocal (lua_State *L) { |
82 | lua_Dbgactreg ar; | 82 | lua_Debug ar; |
83 | lua_Dbglocvar lvar; | 83 | lua_Localvar lvar; |
84 | if (!lua_getstack(L, luaL_check_int(L, 1), &ar)) /* level out of range? */ | 84 | if (!lua_getstack(L, luaL_check_int(L, 1), &ar)) /* level out of range? */ |
85 | luaL_argerror(L, 1, "level out of range"); | 85 | luaL_argerror(L, 1, "level out of range"); |
86 | lvar.index = luaL_check_int(L, 2); | 86 | lvar.index = luaL_check_int(L, 2); |
@@ -92,8 +92,8 @@ static void getlocal (lua_State *L) { | |||
92 | 92 | ||
93 | 93 | ||
94 | static void setlocal (lua_State *L) { | 94 | static void setlocal (lua_State *L) { |
95 | lua_Dbgactreg ar; | 95 | lua_Debug ar; |
96 | lua_Dbglocvar lvar; | 96 | lua_Localvar lvar; |
97 | if (!lua_getstack(L, luaL_check_int(L, 1), &ar)) /* level out of range? */ | 97 | if (!lua_getstack(L, luaL_check_int(L, 1), &ar)) /* level out of range? */ |
98 | luaL_argerror(L, 1, "level out of range"); | 98 | luaL_argerror(L, 1, "level out of range"); |
99 | lvar.index = luaL_check_int(L, 2); | 99 | lvar.index = luaL_check_int(L, 2); |
@@ -113,7 +113,7 @@ static int callhook = LUA_NOREF; /* Lua reference to call hook function */ | |||
113 | 113 | ||
114 | 114 | ||
115 | 115 | ||
116 | static void linef (lua_State *L, lua_Dbgactreg *ar) { | 116 | static void linef (lua_State *L, lua_Debug *ar) { |
117 | if (linehook != LUA_NOREF) { | 117 | if (linehook != LUA_NOREF) { |
118 | lua_pushnumber(L, ar->currentline); | 118 | lua_pushnumber(L, ar->currentline); |
119 | lua_callfunction(L, lua_getref(L, linehook)); | 119 | lua_callfunction(L, lua_getref(L, linehook)); |
@@ -121,7 +121,7 @@ static void linef (lua_State *L, lua_Dbgactreg *ar) { | |||
121 | } | 121 | } |
122 | 122 | ||
123 | 123 | ||
124 | static void callf (lua_State *L, lua_Dbgactreg *ar) { | 124 | static void callf (lua_State *L, lua_Debug *ar) { |
125 | if (callhook != LUA_NOREF) { | 125 | if (callhook != LUA_NOREF) { |
126 | lua_pushstring(L, ar->event); | 126 | lua_pushstring(L, ar->event); |
127 | lua_callfunction(L, lua_getref(L, callhook)); | 127 | lua_callfunction(L, lua_getref(L, callhook)); |