aboutsummaryrefslogtreecommitdiff
path: root/lvm.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>1999-11-30 11:06:50 -0200
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>1999-11-30 11:06:50 -0200
commit3181dfefee40b9a424b80aa779c671f5f458904c (patch)
treeb5660c41aa8a7e30addb23666cbfebe7f02efd01 /lvm.c
parent764e095d7fa903fc3a3578f397ac5e1d5a4c02a1 (diff)
downloadlua-3181dfefee40b9a424b80aa779c671f5f458904c.tar.gz
lua-3181dfefee40b9a424b80aa779c671f5f458904c.tar.bz2
lua-3181dfefee40b9a424b80aa779c671f5f458904c.zip
details
Diffstat (limited to 'lvm.c')
-rw-r--r--lvm.c8
1 files changed, 5 insertions, 3 deletions
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;