nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

bug: lua_getlocal breaks when called with a CFunction.

Browse Source
This commit is contained in:
Roberto Ierusalimschy
1997-07-29 18:11:10 -03:00
parent 2c580a0afb
commit 72a1d81b51
2 changed files with 5 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
bugs
View File

@@ -1,3 +1,3 @@
- arquivo comecando com # fica com numero da linha defazado (inout.c 2.69) - arquivo comecando com # fica com numero da linha defazado (inout.c 2.69)
- LUA_COMPAT2_5 escrito errado em opcode.c (faltou o LUA_) - LUA_COMPAT2_5 escrito errado em opcode.c (faltou o LUA_)
- - opcode.c

5
opcode.c
View File

@@ -3,7 +3,7 @@
** TecCGraf - PUC-Rio ** TecCGraf - PUC-Rio
*/ */
char *rcs_opcode="$Id: opcode.c,v 4.17 1997/07/04 14:55:37 roberto Exp roberto $"; char *rcs_opcode="$Id: opcode.c,v 4.18 1997/07/29 13:35:06 roberto Exp roberto $";
#include <setjmp.h> #include <setjmp.h>
#include <stdio.h> #include <stdio.h>
@@ -538,6 +538,9 @@ int lua_currentline (lua_Function func)
lua_Object lua_getlocal (lua_Function func, int local_number, char **name) lua_Object lua_getlocal (lua_Function func, int local_number, char **name)
{ {
TObject *f = luaI_Address(func); TObject *f = luaI_Address(func);
/* check whether func is a Lua function */
if (ttype(f) != LUA_T_MARK && ttype(f) != LUA_T_FUNCTION)
return LUA_NOOBJECT;
*name = luaI_getlocalname(f->value.tf, local_number, lua_currentline(func)); *name = luaI_getlocalname(f->value.tf, local_number, lua_currentline(func));
if (*name) if (*name)
{ {