mirrors/lua
1
0
Fork 0
mirror of https://github.com/lua/lua synced 2025-01-11 20:09:17 +03:00
Code Issues Packages Projects Releases Wiki Activity

detail ('lua_tolstring' instead of lua_objlen)

Browse Source
This commit is contained in:
Roberto Ierusalimschy 2009-12-15 09:25:16 -02:00
parent 15b823ce4f
commit a25b8ff69c
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
lbaselib.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: lbaselib.c,v 1.230 2009/12/10 18:17:37 roberto Exp roberto $ ** $Id: lbaselib.c,v 1.231 2009/12/11 13:40:44 roberto Exp roberto $
** Basic library ** Basic library
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -346,12 +346,13 @@ static const char *generic_reader (lua_State *L, void *ud, size_t *size) {
static int luaB_load_aux (lua_State *L, int farg) { static int luaB_load_aux (lua_State *L, int farg) {
int status; int status;
Readstat stat; Readstat stat;
const char *s = lua_tostring(L, farg); size_t l;
const char *s = lua_tolstring(L, farg, &l);
stat.mode = luaL_optstring(L, farg + 2, "bt"); stat.mode = luaL_optstring(L, farg + 2, "bt");
if (s != NULL) { /* loading a string? */ if (s != NULL) { /* loading a string? */
const char *chunkname = luaL_optstring(L, farg + 1, s); const char *chunkname = luaL_optstring(L, farg + 1, s);
status = (checkrights(L, stat.mode, s) != NULL) status = (checkrights(L, stat.mode, s) != NULL)
|| luaL_loadbuffer(L, s, lua_objlen(L, farg), chunkname); || luaL_loadbuffer(L, s, l, chunkname);
} }
else { /* loading from a reader function */ else { /* loading from a reader function */
const char *chunkname = luaL_optstring(L, farg + 1, "=(load)"); const char *chunkname = luaL_optstring(L, farg + 1, "=(load)");