diff options
| -rw-r--r-- | lauxlib.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lauxlib.c,v 1.101 2003/05/15 12:20:24 roberto Exp roberto $ | 2 | ** $Id: lauxlib.c,v 1.102 2003/05/16 18:59:08 roberto Exp roberto $ |
| 3 | ** Auxiliary functions for building Lua libraries | 3 | ** Auxiliary functions for building Lua libraries |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -74,7 +74,7 @@ static void tag_error (lua_State *L, int narg, int tag) { | |||
| 74 | LUALIB_API void luaL_where (lua_State *L, int level) { | 74 | LUALIB_API void luaL_where (lua_State *L, int level) { |
| 75 | lua_Debug ar; | 75 | lua_Debug ar; |
| 76 | if (lua_getstack(L, level, &ar)) { /* check function at level */ | 76 | if (lua_getstack(L, level, &ar)) { /* check function at level */ |
| 77 | lua_getinfo(L, "Snl", &ar); /* get info about it */ | 77 | lua_getinfo(L, "Sl", &ar); /* get info about it */ |
| 78 | if (ar.currentline > 0) { /* is there info? */ | 78 | if (ar.currentline > 0) { /* is there info? */ |
| 79 | lua_pushfstring(L, "%s:%d: ", ar.short_src, ar.currentline); | 79 | lua_pushfstring(L, "%s:%d: ", ar.short_src, ar.currentline); |
| 80 | return; | 80 | return; |
