diff --git a/lbuiltin.c b/lbuiltin.c index d466c8fc..c9fefa35 100644 --- a/lbuiltin.c +++ b/lbuiltin.c @@ -1,5 +1,5 @@ /* -** $Id: lbuiltin.c,v 1.76 1999/11/26 18:53:03 roberto Exp roberto $ +** $Id: lbuiltin.c,v 1.77 1999/11/29 19:11:36 roberto Exp roberto $ ** Built-in functions ** See Copyright Notice in lua.h */ @@ -187,7 +187,7 @@ static void luaB_rawgetglobal (lua_State *L) { lua_pushobject(L, lua_rawgetglobal(L, luaL_check_string(L, 1))); } -static void luaB_luatag (lua_State *L) { +static void luaB_tag (lua_State *L) { lua_pushnumber(L, lua_tag(L, lua_getparam(L, 1))); } @@ -789,7 +789,7 @@ static const struct luaL_reg builtin_funcs[] = { {"setglobal", luaB_setglobal}, {"settag", luaB_settag}, {"settagmethod", luaB_settagmethod}, - {"tag", luaB_luatag}, + {"tag", luaB_tag}, {"tonumber", luaB_tonumber}, {"tostring", luaB_tostring}, {"type", luaB_type}, diff --git a/lvm.c b/lvm.c index 2a906dc4..32aa59f1 100644 --- a/lvm.c +++ b/lvm.c @@ -1,5 +1,5 @@ /* -** $Id: lvm.c,v 1.66 1999/11/22 13:12:07 roberto Exp roberto $ +** $Id: lvm.c,v 1.67 1999/11/25 18:59:43 roberto Exp roberto $ ** Lua virtual machine ** See Copyright Notice in lua.h */ @@ -37,7 +37,8 @@ -static TaggedString *strconc (lua_State *L, const TaggedString *l, const TaggedString *r) { +static TaggedString *strconc (lua_State *L, const TaggedString *l, + const TaggedString *r) { long nl = l->u.s.len; long nr = r->u.s.len; char *buffer = luaL_openspace(L, nl+nr); @@ -298,7 +299,8 @@ static void adjust_varargs (lua_State *L, StkId first_extra_arg) { ** [stack+base,top). Returns n such that the the results are between ** [stack+n,top). */ -StkId luaV_execute (lua_State *L, const Closure *cl, const TProtoFunc *tf, StkId base) { +StkId luaV_execute (lua_State *L, const Closure *cl, const TProtoFunc *tf, + StkId base) { struct Stack *S = &L->stack; /* to optimize */ register const Byte *pc = tf->code; const TObject *consts = tf->consts;