aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lbuiltin.c6
-rw-r--r--lvm.c8
2 files changed, 8 insertions, 6 deletions
diff --git a/lbuiltin.c b/lbuiltin.c
index d466c8fc..c9fefa35 100644
--- a/lbuiltin.c
+++ b/lbuiltin.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lbuiltin.c,v 1.76 1999/11/26 18:53:03 roberto Exp roberto $ 2** $Id: lbuiltin.c,v 1.77 1999/11/29 19:11:36 roberto Exp roberto $
3** Built-in functions 3** Built-in functions
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -187,7 +187,7 @@ static void luaB_rawgetglobal (lua_State *L) {
187 lua_pushobject(L, lua_rawgetglobal(L, luaL_check_string(L, 1))); 187 lua_pushobject(L, lua_rawgetglobal(L, luaL_check_string(L, 1)));
188} 188}
189 189
190static void luaB_luatag (lua_State *L) { 190static void luaB_tag (lua_State *L) {
191 lua_pushnumber(L, lua_tag(L, lua_getparam(L, 1))); 191 lua_pushnumber(L, lua_tag(L, lua_getparam(L, 1)));
192} 192}
193 193
@@ -789,7 +789,7 @@ static const struct luaL_reg builtin_funcs[] = {
789 {"setglobal", luaB_setglobal}, 789 {"setglobal", luaB_setglobal},
790 {"settag", luaB_settag}, 790 {"settag", luaB_settag},
791 {"settagmethod", luaB_settagmethod}, 791 {"settagmethod", luaB_settagmethod},
792 {"tag", luaB_luatag}, 792 {"tag", luaB_tag},
793 {"tonumber", luaB_tonumber}, 793 {"tonumber", luaB_tonumber},
794 {"tostring", luaB_tostring}, 794 {"tostring", luaB_tostring},
795 {"type", luaB_type}, 795 {"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 @@
1/* 1/*
2** $Id: lvm.c,v 1.66 1999/11/22 13:12:07 roberto Exp roberto $ 2** $Id: lvm.c,v 1.67 1999/11/25 18:59:43 roberto Exp roberto $
3** Lua virtual machine 3** Lua virtual machine
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -37,7 +37,8 @@
37 37
38 38
39 39
40static TaggedString *strconc (lua_State *L, const TaggedString *l, const TaggedString *r) { 40static TaggedString *strconc (lua_State *L, const TaggedString *l,
41 const TaggedString *r) {
41 long nl = l->u.s.len; 42 long nl = l->u.s.len;
42 long nr = r->u.s.len; 43 long nr = r->u.s.len;
43 char *buffer = luaL_openspace(L, nl+nr); 44 char *buffer = luaL_openspace(L, nl+nr);
@@ -298,7 +299,8 @@ static void adjust_varargs (lua_State *L, StkId first_extra_arg) {
298** [stack+base,top). Returns n such that the the results are between 299** [stack+base,top). Returns n such that the the results are between
299** [stack+n,top). 300** [stack+n,top).
300*/ 301*/
301StkId luaV_execute (lua_State *L, const Closure *cl, const TProtoFunc *tf, StkId base) { 302StkId luaV_execute (lua_State *L, const Closure *cl, const TProtoFunc *tf,
303 StkId base) {
302 struct Stack *S = &L->stack; /* to optimize */ 304 struct Stack *S = &L->stack; /* to optimize */
303 register const Byte *pc = tf->code; 305 register const Byte *pc = tf->code;
304 const TObject *consts = tf->consts; 306 const TObject *consts = tf->consts;