Correcao do tratamento de erro reportado dentro de uma funcao.

1 files changed, 2 insertions, 2 deletions

diff --git a/lua.stx b/lua.stx
index 79224d3d..e71a8bda 100644
--- a/lua.stx
+++ b/lua.stx
@@ -1,6 +1,6 @@
 %{
 
-char *rcs_luastx = "$Id: lua.stx,v 2.7 1994/08/05 19:31:09 celes Exp celes $";
+char *rcs_luastx = "$Id: lua.stx,v 2.8 1994/10/11 13:02:39 celes Exp celes $";
 
 #include <stdio.h>
 #include <stdlib.h>
@@ -283,7 +283,7 @@ function     : FUNCTION NAME
                 if (lua_debug)
                 {
                  code_byte(SETFUNCTION); 
-                 code_word(lua_nfile-1);
+                 code_code((Byte *)lua_file[lua_nfile-1]);
                  code_word($<vWord>3);
                 }
                 lua_codeadjust (0);