summaryrefslogtreecommitdiff
path: root/ldblib.c
diff options
context:
space:
mode:
Diffstat (limited to 'ldblib.c')
-rw-r--r--ldblib.c16
1 files changed, 8 insertions, 8 deletions
diff --git a/ldblib.c b/ldblib.c
index ce6cfa2a..1859346e 100644
--- a/ldblib.c
+++ b/ldblib.c
@@ -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
44static void getstack (lua_State *L) { 44static 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
81static void getlocal (lua_State *L) { 81static 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
94static void setlocal (lua_State *L) { 94static 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
116static void linef (lua_State *L, lua_Dbgactreg *ar) { 116static 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
124static void callf (lua_State *L, lua_Dbgactreg *ar) { 124static 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));