diff options
| -rw-r--r-- | lauxlib.c | 6 |
1 files changed, 3 insertions, 3 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lauxlib.c,v 1.243 2012/04/20 17:05:17 roberto Exp roberto $ | 2 | ** $Id: lauxlib.c,v 1.244 2012/05/31 20:28:45 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 | */ |
| @@ -84,7 +84,7 @@ static void pushfuncname (lua_State *L, lua_Debug *ar) { | |||
| 84 | if (*ar->namewhat != '\0') /* is there a name? */ | 84 | if (*ar->namewhat != '\0') /* is there a name? */ |
| 85 | lua_pushfstring(L, "function " LUA_QS, ar->name); | 85 | lua_pushfstring(L, "function " LUA_QS, ar->name); |
| 86 | else if (*ar->what == 'm') /* main? */ | 86 | else if (*ar->what == 'm') /* main? */ |
| 87 | lua_pushfstring(L, "main chunk"); | 87 | lua_pushliteral(L, "main chunk"); |
| 88 | else if (*ar->what == 'C') { | 88 | else if (*ar->what == 'C') { |
| 89 | if (pushglobalfuncname(L, ar)) { | 89 | if (pushglobalfuncname(L, ar)) { |
| 90 | lua_pushfstring(L, "function " LUA_QS, lua_tostring(L, -1)); | 90 | lua_pushfstring(L, "function " LUA_QS, lua_tostring(L, -1)); |
| @@ -214,7 +214,7 @@ LUALIB_API int luaL_fileresult (lua_State *L, int stat, const char *fname) { | |||
| 214 | if (fname) | 214 | if (fname) |
| 215 | lua_pushfstring(L, "%s: %s", fname, strerror(en)); | 215 | lua_pushfstring(L, "%s: %s", fname, strerror(en)); |
| 216 | else | 216 | else |
| 217 | lua_pushfstring(L, "%s", strerror(en)); | 217 | lua_pushstring(L, strerror(en)); |
| 218 | lua_pushinteger(L, en); | 218 | lua_pushinteger(L, en); |
| 219 | return 3; | 219 | return 3; |
| 220 | } | 220 | } |
