From 5a8bb00df443dfdb5708689f32c64e90f2557bf8 Mon Sep 17 00:00:00 2001 From: Roberto Ierusalimschy Date: Thu, 4 Mar 1999 18:23:39 -0300 Subject: storing chunk "sources" instead of "filenames". --- ldblib.c | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'ldblib.c') diff --git a/ldblib.c b/ldblib.c index 6e8cc5b7..18951e3c 100644 --- a/ldblib.c +++ b/ldblib.c @@ -1,5 +1,5 @@ /* -** $Id: ldblib.c,v 1.3 1999/01/15 11:36:28 roberto Exp roberto $ +** $Id: ldblib.c,v 1.4 1999/02/04 17:47:59 roberto Exp roberto $ ** Interface from Lua to its debug API ** See Copyright Notice in lua.h */ @@ -33,24 +33,24 @@ static void settabsi (lua_Object t, char *i, int v) { static lua_Object getfuncinfo (lua_Object func) { lua_Object result = lua_createtable(); - char *name; + char *str; int line; - lua_funcinfo(func, &name, &line); + lua_funcinfo(func, &str, &line); if (line == -1) /* C function? */ settabss(result, "kind", "C"); else if (line == 0) { /* "main"? */ settabss(result, "kind", "chunk"); - settabss(result, "name", name); + settabss(result, "source", str); } else { /* Lua function */ settabss(result, "kind", "Lua"); settabsi(result, "def_line", line); - settabss(result, "def_chunk", name); + settabss(result, "source", str); } if (line != 0) { /* is it not a "main"? */ - char *kind = lua_getobjname(func, &name); + char *kind = lua_getobjname(func, &str); if (*kind) { - settabss(result, "name", name); + settabss(result, "name", str); settabss(result, "where", kind); } } -- cgit v1.2.3-55-g6feb