diff options
| -rw-r--r-- | opcode.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -3,7 +3,7 @@ | |||
| 3 | ** TecCGraf - PUC-Rio | 3 | ** TecCGraf - PUC-Rio |
| 4 | */ | 4 | */ |
| 5 | 5 | ||
| 6 | char *rcs_opcode="$Id: opcode.c,v 3.21 1994/11/22 16:02:53 roberto Exp roberto $"; | 6 | char *rcs_opcode="$Id: opcode.c,v 3.22 1994/11/23 14:31:11 roberto Stab roberto $"; |
| 7 | 7 | ||
| 8 | #include <setjmp.h> | 8 | #include <setjmp.h> |
| 9 | #include <stdio.h> | 9 | #include <stdio.h> |
| @@ -485,7 +485,7 @@ void lua_endblock (void) | |||
| 485 | */ | 485 | */ |
| 486 | int lua_storesubscript (void) | 486 | int lua_storesubscript (void) |
| 487 | { | 487 | { |
| 488 | static Byte code[2] = {STOREINDEXED, RETCODE0}; | 488 | static Byte code[2] = {STOREINDEXED0, RETCODE0}; |
| 489 | Object func; | 489 | Object func; |
| 490 | tag(&func) = LUA_T_FUNCTION; bvalue(&func) = code; | 490 | tag(&func) = LUA_T_FUNCTION; bvalue(&func) = code; |
| 491 | adjustC(3); | 491 | adjustC(3); |
