From 493d718b7fe0f1075072a44d7946e38ca7d773d3 Mon Sep 17 00:00:00 2001 From: Waldemar Celes Date: Tue, 19 Jul 1994 18:27:18 -0300 Subject: Uso de arvores binarias para armazenar nomes e realocacao dinamica de tabelas (pilhas, hashtable, globais, codigo, etc.) --- inout.c | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) (limited to 'inout.c') diff --git a/inout.c b/inout.c index 7587da56..7548e05e 100644 --- a/inout.c +++ b/inout.c @@ -4,7 +4,7 @@ ** facilities. */ -char *rcs_inout="$Id: inout.c,v 1.1 1993/12/17 18:41:19 celes Exp roberto $"; +char *rcs_inout="$Id: inout.c,v 1.2 1993/12/22 21:15:16 roberto Exp celes $"; #include #include @@ -13,6 +13,7 @@ char *rcs_inout="$Id: inout.c,v 1.1 1993/12/17 18:41:19 celes Exp roberto $"; #include "hash.h" #include "inout.h" #include "table.h" +#include "tree.h" /* Exported variables */ int lua_linenumber; @@ -157,12 +158,12 @@ void lua_reportbug (char *s) { sprintf (strchr(msg,0), "\n\tin statement begining at line %d in function \"%s\" of file \"%s\"", - lua_debugline, s_name(funcstack[nfuncstack-1].function), + lua_debugline, lua_varname(funcstack[nfuncstack-1].function), lua_file[funcstack[nfuncstack-1].file]); sprintf (strchr(msg,0), "\n\tactive stack\n"); for (i=nfuncstack-1; i>=0; i--) sprintf (strchr(msg,0), "\t-> function \"%s\" of file \"%s\"\n", - s_name(funcstack[i].function), + lua_varname(funcstack[i].function), lua_file[funcstack[i].file]); } else -- cgit v1.2.3-55-g6feb