mirrors/lua
1
0
Fork 0
mirror of https://github.com/lua/lua synced 2024-12-25 20:06:50 +03:00
Code Issues Packages Projects Releases Wiki Activity

no more `register' declarations: leave it to the compiler.

Browse Source
This commit is contained in:
Roberto Ierusalimschy 2000-04-19 10:36:25 -03:00
parent 8f2fba5877
commit 89a9c36281
2 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
lvm.c
View File

@ -1,5 +1,5 @@
/*
** $Id: lvm.c,v 1.102 2000/04/13 16:51:01 roberto Exp roberto $
** $Id: lvm.c,v 1.103 2000/04/14 17:45:25 roberto Exp roberto $
** Lua virtual machine
** See Copyright Notice in lua.h
*/
@ -334,10 +334,10 @@ static void adjust_varargs (lua_State *L, StkId base, int nfixargs) {
** Executes the given Lua function. Parameters are between [base,top).
** Returns n such that the the results are between [n,top).
*/
StkId luaV_execute (lua_State *L, const Closure *cl, register StkId base) {
StkId luaV_execute (lua_State *L, const Closure *cl, StkId base) {
const Proto *tf = cl->f.l;
register StkId top; /* keep top local, for performance */
register const Instruction *pc = tf->code;
StkId top; /* keep top local, for performance */
const Instruction *pc = tf->code;
TString **kstr = tf->kstr;
luaD_checkstack(L, tf->maxstacksize+EXTRA_STACK);
if (tf->is_vararg) { /* varargs? */
@ -348,7 +348,7 @@ StkId luaV_execute (lua_State *L, const Closure *cl, register StkId base) {
luaD_adjusttop(L, base, tf->numparams);
top = L->top;
for (;;) {
register Instruction i = *pc++;
Instruction i = *pc++;
switch (GET_OPCODE(i)) {
case OP_END:

4
lvm.h
View File

@ -1,5 +1,5 @@
/*
** $Id: lvm.h,v 1.19 2000/03/10 18:37:44 roberto Exp roberto $
** $Id: lvm.h,v 1.20 2000/03/29 20:19:20 roberto Exp roberto $
** Lua virtual machine
** See Copyright Notice in lua.h
*/
@ -26,7 +26,7 @@ void luaV_settable (lua_State *L, StkId t, StkId top);
void luaV_rawsettable (lua_State *L, StkId t);
void luaV_getglobal (lua_State *L, GlobalVar *gv, StkId top);
void luaV_setglobal (lua_State *L, GlobalVar *gv, StkId top);
StkId luaV_execute (lua_State *L, const Closure *cl, register StkId base);
StkId luaV_execute (lua_State *L, const Closure *cl, StkId base);
void luaV_Cclosure (lua_State *L, lua_CFunction c, int nelems);
void luaV_Lclosure (lua_State *L, Proto *l, int nelems);
int luaV_lessthan (lua_State *L, const TObject *l, const TObject *r, StkId top);