GitHub/lua
1
0
Fork 0
mirror of https://github.com/lua/lua.git synced 2025-01-14 05:43:00 +08:00
Code Issues Projects Releases Wiki Activity

warnings

Browse Source
This commit is contained in:
Roberto Ierusalimschy 1999-03-01 17:22:16 -03:00
parent ae9fd122fa
commit ab8ea5c38a
1 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
lbuiltin.c
View File

@ -1,5 +1,5 @@
/*
** $Id: lbuiltin.c,v 1.53 1999/02/22 19:13:12 roberto Exp roberto $
** $Id: lbuiltin.c,v 1.54 1999/02/23 14:57:28 roberto Exp roberto $
** Built-in functions
** See Copyright Notice in lua.h
*/
@ -147,7 +147,7 @@ static void luaB_tonumber (void) {
long n;
luaL_arg_check(0 <= base && base <= 36, 2, "base out of range");
n = strtol(s, &s, base);
while (isspace(*s)) s++; /* skip trailing spaces */
while (isspace((unsigned char)*s)) s++; /* skip trailing spaces */
if (*s) lua_pushnil(); /* invalid format: return nil */
else lua_pushnumber(n);
}
@ -190,7 +190,7 @@ static void luaB_settag (void) {
lua_Object o = luaL_tablearg(1);
lua_pushobject(o);
lua_settag(luaL_check_int(2));
lua_pushobject(o); /* returns first argument */
lua_pushobject(o); /* return first argument */
}
static void luaB_newtag (void) {
@ -649,7 +649,7 @@ static void testC (void) {
case 'N' : lua_pushstring(lua_nextvar(lua_getstring(reg[getnum(s)])));
break;
case 'n' : { int n=getnum(s);
n=lua_next(reg[n], lua_getnumber(reg[getnum(s)]));
n=lua_next(reg[n], (int)lua_getnumber(reg[getnum(s)]));
lua_pushnumber(n); break;
}
default: luaL_verror("unknown command in `testC': %c", *(s-1));