diff options
Diffstat (limited to 'lvm.c')
-rw-r--r-- | lvm.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lvm.c,v 1.83 2000/01/25 13:57:18 roberto Exp roberto $ | 2 | ** $Id: lvm.c,v 1.84 2000/01/28 16:53:00 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 | */ |
@@ -311,7 +311,7 @@ static void adjust_varargs (lua_State *L, StkId base, int nfixargs) { | |||
311 | ** Returns n such that the the results are between [n,top). | 311 | ** Returns n such that the the results are between [n,top). |
312 | */ | 312 | */ |
313 | StkId luaV_execute (lua_State *L, const Closure *cl, const TProtoFunc *tf, | 313 | StkId luaV_execute (lua_State *L, const Closure *cl, const TProtoFunc *tf, |
314 | StkId base) { | 314 | register StkId base) { |
315 | register StkId top; /* keep top local, for performance */ | 315 | register StkId top; /* keep top local, for performance */ |
316 | register const Byte *pc = tf->code; | 316 | register const Byte *pc = tf->code; |
317 | TaggedString **kstr = tf->kstr; | 317 | TaggedString **kstr = tf->kstr; |
@@ -661,7 +661,7 @@ StkId luaV_execute (lua_State *L, const Closure *cl, const TProtoFunc *tf, | |||
661 | case SETNAMEW: aux += highbyte(L, *pc++); | 661 | case SETNAMEW: aux += highbyte(L, *pc++); |
662 | case SETNAME: aux += *pc++; | 662 | case SETNAME: aux += *pc++; |
663 | if ((base-2)->ttype == LUA_T_LINE) { /* function has debug info? */ | 663 | if ((base-2)->ttype == LUA_T_LINE) { /* function has debug info? */ |
664 | (base-1)->ttype = -(*pc++); | 664 | (base-1)->ttype = (lua_Type)(-(*pc++)); |
665 | (base-1)->value.i = aux; | 665 | (base-1)->value.i = aux; |
666 | } | 666 | } |
667 | break; | 667 | break; |