diff options
| -rw-r--r-- | lopcodes.h | 8 | ||||
| -rw-r--r-- | lvm.c | 4 |
2 files changed, 6 insertions, 6 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lopcodes.h,v 1.28 1999/02/25 19:13:56 roberto Exp roberto $ | 2 | ** $Id: lopcodes.h,v 1.29 1999/02/26 15:19:54 roberto Exp roberto $ |
| 3 | ** Opcodes for Lua virtual machine | 3 | ** Opcodes for Lua virtual machine |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -65,8 +65,8 @@ SETTABLEPOPDUP,/* - v i t v t[i]=v */ | |||
| 65 | SETTABLE,/* b v a_b...a_1 i t a_b...a_1 i t t[i]=v */ | 65 | SETTABLE,/* b v a_b...a_1 i t a_b...a_1 i t t[i]=v */ |
| 66 | SETTABLEDUP,/* b v a_b...a_1 i t v a_b...a_1 i t t[i]=v */ | 66 | SETTABLEDUP,/* b v a_b...a_1 i t v a_b...a_1 i t t[i]=v */ |
| 67 | 67 | ||
| 68 | SETLISTW,/* w c v_c...v_1 t - t[i+w*FPF]=v_i */ | 68 | SETLISTW,/* w c v_c...v_1 t t t[i+w*FPF]=v_i */ |
| 69 | SETLIST,/* b c v_c...v_1 t - t[i+b*FPF]=v_i */ | 69 | SETLIST,/* b c v_c...v_1 t t t[i+b*FPF]=v_i */ |
| 70 | 70 | ||
| 71 | SETMAP,/* b v_b k_b ...v_0 k_0 t t t[k_i]=v_i */ | 71 | SETMAP,/* b v_b k_b ...v_0 k_0 t t t[k_i]=v_i */ |
| 72 | 72 | ||
| @@ -101,7 +101,7 @@ IFFUPJMP,/* b x - (x==nil)? PC-=b */ | |||
| 101 | CLOSUREW,/* w c v_c...v_1 closure(CNST[w], v_c...v_1) */ | 101 | CLOSUREW,/* w c v_c...v_1 closure(CNST[w], v_c...v_1) */ |
| 102 | CLOSURE,/* b c v_c...v_1 closure(CNST[b], v_c...v_1) */ | 102 | CLOSURE,/* b c v_c...v_1 closure(CNST[b], v_c...v_1) */ |
| 103 | 103 | ||
| 104 | CALLFUNC,/* b c v_c...v_1 f r_b...r_1 f(v1,...,v_c) */ | 104 | CALL,/* b c v_c...v_1 f r_b...r_1 f(v1,...,v_c) */ |
| 105 | 105 | ||
| 106 | SETLINEW,/* w - - LINE=w */ | 106 | SETLINEW,/* w - - LINE=w */ |
| 107 | SETLINE,/* b - - LINE=b */ | 107 | SETLINE,/* b - - LINE=b */ |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lvm.c,v 1.50 1999/02/23 13:38:38 roberto Exp roberto $ | 2 | ** $Id: lvm.c,v 1.51 1999/02/24 17:55:51 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 | */ |
| @@ -619,7 +619,7 @@ StkId luaV_execute (Closure *cl, TProtoFunc *tf, StkId base) { | |||
| 619 | luaC_checkGC(); | 619 | luaC_checkGC(); |
| 620 | break; | 620 | break; |
| 621 | 621 | ||
| 622 | case CALLFUNC: aux = *pc++; { | 622 | case CALL: aux = *pc++; { |
| 623 | StkId newBase = (S->top-S->stack)-(*pc++); | 623 | StkId newBase = (S->top-S->stack)-(*pc++); |
| 624 | luaD_call(newBase, aux); | 624 | luaD_call(newBase, aux); |
| 625 | break; | 625 | break; |
