summaryrefslogtreecommitdiff
path: root/inout.c
diff options
context:
space:
mode:
Diffstat (limited to 'inout.c')
-rw-r--r--inout.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/inout.c b/inout.c
index 9a54f4fc..a7dc7413 100644
--- a/inout.c
+++ b/inout.c
@@ -5,7 +5,7 @@
5** Also provides some predefined lua functions. 5** Also provides some predefined lua functions.
6*/ 6*/
7 7
8char *rcs_inout="$Id: inout.c,v 2.9 1994/11/08 20:06:15 roberto Exp roberto $"; 8char *rcs_inout="$Id: inout.c,v 2.10 1994/11/09 18:09:22 roberto Exp roberto $";
9 9
10#include <stdio.h> 10#include <stdio.h>
11#include <stdlib.h> 11#include <stdlib.h>
@@ -150,12 +150,12 @@ void lua_reportbug (char *s)
150 { 150 {
151 sprintf (strchr(msg,0), 151 sprintf (strchr(msg,0),
152 "\n\tin statement begining at line %d in function \"%s\" of file \"%s\"", 152 "\n\tin statement begining at line %d in function \"%s\" of file \"%s\"",
153 lua_debugline, lua_varname(funcstack[nfuncstack-1].function), 153 lua_debugline, lua_constant[funcstack[nfuncstack-1].function],
154 funcstack[nfuncstack-1].file); 154 funcstack[nfuncstack-1].file);
155 sprintf (strchr(msg,0), "\n\tactive stack\n"); 155 sprintf (strchr(msg,0), "\n\tactive stack\n");
156 for (i=nfuncstack-1; i>=0; i--) 156 for (i=nfuncstack-1; i>=0; i--)
157 sprintf (strchr(msg,0), "\t-> function \"%s\" of file \"%s\"\n", 157 sprintf (strchr(msg,0), "\t-> function \"%s\" of file \"%s\"\n",
158 lua_varname(funcstack[i].function), 158 lua_constant[funcstack[i].function],
159 funcstack[i].file); 159 funcstack[i].file);
160 } 160 }
161 else 161 else