diff --git a/lobject.c b/lobject.c index 0462fc8b..b68f7e98 100644 --- a/lobject.c +++ b/lobject.c @@ -1,5 +1,5 @@ /* -** $Id: lobject.c,v 1.14 1998/12/27 20:25:20 roberto Exp roberto $ +** $Id: lobject.c,v 1.15 1999/01/04 13:37:07 roberto Exp roberto $ ** Some generic functions over Lua objects ** See Copyright Notice in lua.h */ @@ -90,7 +90,7 @@ static double expten (unsigned int e) { } -double luaO_str2d (char *s) { +double luaO_str2d (char *s) { /* LUA_NUMBER */ double a = 0.0; int point = 0; if (!isdigit((unsigned char)*s) && !isdigit((unsigned char)*(s+1))) diff --git a/ltm.c b/ltm.c index 9b1faf09..f061e56c 100644 --- a/ltm.c +++ b/ltm.c @@ -1,5 +1,5 @@ /* -** $Id: ltm.c,v 1.17 1998/08/21 17:43:44 roberto Exp roberto $ +** $Id: ltm.c,v 1.18 1998/12/22 18:10:50 roberto Exp roberto $ ** Tag methods ** See Copyright Notice in lua.h */ @@ -46,8 +46,7 @@ static char validevents[NUM_TAGS][IM_N] = { /* ORDER LUA_T, ORDER IM */ }; -static int validevent (int t, int e) -{ /* ORDER LUA_T */ +static int validevent (int t, int e) { /* ORDER LUA_T */ return (t < LUA_T_NIL) ? 1 : validevents[-t][e]; } @@ -157,10 +156,9 @@ void luaT_settagmethod (int t, char *event, TObject *func) } -char *luaT_travtagmethods (int (*fn)(TObject *)) -{ +char *luaT_travtagmethods (int (*fn)(TObject *)) { /* ORDER IM */ int e; - for (e=IM_GETTABLE; e<=IM_FUNCTION; e++) { /* ORDER IM */ + for (e=IM_GETTABLE; e<=IM_FUNCTION; e++) { int t; for (t=0; t>=L->last_tag; t--) if (fn(luaT_getim(t,e)))