diff options
author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2001-03-07 15:16:22 -0300 |
---|---|---|
committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 2001-03-07 15:16:22 -0300 |
commit | c5a23cf01aca02a8a8d0ee5f5f558f74b31ded89 (patch) | |
tree | 7a5b5107458b8c13d2a1352a3e05118584067c83 /lvm.c | |
parent | 6048c4f74d7d63d6c2f5a53cd8e4ee01f6702be9 (diff) | |
download | lua-c5a23cf01aca02a8a8d0ee5f5f558f74b31ded89.tar.gz lua-c5a23cf01aca02a8a8d0ee5f5f558f74b31ded89.tar.bz2 lua-c5a23cf01aca02a8a8d0ee5f5f558f74b31ded89.zip |
details
Diffstat (limited to 'lvm.c')
-rw-r--r-- | lvm.c | 13 |
1 files changed, 6 insertions, 7 deletions
@@ -1,5 +1,5 @@ | |||
1 | /* | 1 | /* |
2 | ** $Id: lvm.c,v 1.174 2001/03/07 13:22:55 roberto Exp roberto $ | 2 | ** $Id: lvm.c,v 1.175 2001/03/07 18:09:25 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 | */ |
@@ -330,7 +330,6 @@ StkId luaV_execute (lua_State *L, const Closure *cl, StkId base) { | |||
330 | const Proto *const tf = cl->f.l; | 330 | const Proto *const tf = cl->f.l; |
331 | StkId top; /* keep top local, for performance */ | 331 | StkId top; /* keep top local, for performance */ |
332 | const Instruction *pc = tf->code; | 332 | const Instruction *pc = tf->code; |
333 | TString **const kstr = tf->kstr; | ||
334 | const lua_Hook linehook = L->linehook; | 333 | const lua_Hook linehook = L->linehook; |
335 | L->ci->pc = &pc; | 334 | L->ci->pc = &pc; |
336 | if (tf->is_vararg) /* varargs? */ | 335 | if (tf->is_vararg) /* varargs? */ |
@@ -375,7 +374,7 @@ StkId luaV_execute (lua_State *L, const Closure *cl, StkId base) { | |||
375 | break; | 374 | break; |
376 | } | 375 | } |
377 | case OP_PUSHSTRING: { | 376 | case OP_PUSHSTRING: { |
378 | setsvalue(top, kstr[GETARG_U(i)]); | 377 | setsvalue(top, tf->kstr[GETARG_U(i)]); |
379 | top++; | 378 | top++; |
380 | break; | 379 | break; |
381 | } | 380 | } |
@@ -398,7 +397,7 @@ StkId luaV_execute (lua_State *L, const Closure *cl, StkId base) { | |||
398 | break; | 397 | break; |
399 | } | 398 | } |
400 | case OP_GETGLOBAL: { | 399 | case OP_GETGLOBAL: { |
401 | luaV_getglobal(L, kstr[GETARG_U(i)], top); | 400 | luaV_getglobal(L, tf->kstr[GETARG_U(i)], top); |
402 | top++; | 401 | top++; |
403 | break; | 402 | break; |
404 | } | 403 | } |
@@ -408,7 +407,7 @@ StkId luaV_execute (lua_State *L, const Closure *cl, StkId base) { | |||
408 | break; | 407 | break; |
409 | } | 408 | } |
410 | case OP_GETDOTTED: { | 409 | case OP_GETDOTTED: { |
411 | setsvalue(top, kstr[GETARG_U(i)]); | 410 | setsvalue(top, tf->kstr[GETARG_U(i)]); |
412 | luaV_gettable(L, top-1, top, top-1); | 411 | luaV_gettable(L, top-1, top, top-1); |
413 | break; | 412 | break; |
414 | } | 413 | } |
@@ -418,7 +417,7 @@ StkId luaV_execute (lua_State *L, const Closure *cl, StkId base) { | |||
418 | } | 417 | } |
419 | case OP_PUSHSELF: { | 418 | case OP_PUSHSELF: { |
420 | setobj(top, top-1); | 419 | setobj(top, top-1); |
421 | setsvalue(top+1, kstr[GETARG_U(i)]); | 420 | setsvalue(top+1, tf->kstr[GETARG_U(i)]); |
422 | luaV_gettable(L, top-1, top+1, top-1); | 421 | luaV_gettable(L, top-1, top+1, top-1); |
423 | top++; | 422 | top++; |
424 | break; | 423 | break; |
@@ -435,7 +434,7 @@ StkId luaV_execute (lua_State *L, const Closure *cl, StkId base) { | |||
435 | } | 434 | } |
436 | case OP_SETGLOBAL: { | 435 | case OP_SETGLOBAL: { |
437 | top--; | 436 | top--; |
438 | luaV_setglobal(L, kstr[GETARG_U(i)], top); | 437 | luaV_setglobal(L, tf->kstr[GETARG_U(i)], top); |
439 | break; | 438 | break; |
440 | } | 439 | } |
441 | case OP_SETTABLE: { | 440 | case OP_SETTABLE: { |