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); |