mirror of https://github.com/lua/lua
small bug correction
This commit is contained in:
parent
0f580df73c
commit
e742d54253
4
opcode.c
4
opcode.c
|
@ -3,7 +3,7 @@
|
||||||
** TecCGraf - PUC-Rio
|
** TecCGraf - PUC-Rio
|
||||||
*/
|
*/
|
||||||
|
|
||||||
char *rcs_opcode="$Id: opcode.c,v 3.21 1994/11/22 16:02:53 roberto Exp roberto $";
|
char *rcs_opcode="$Id: opcode.c,v 3.22 1994/11/23 14:31:11 roberto Stab roberto $";
|
||||||
|
|
||||||
#include <setjmp.h>
|
#include <setjmp.h>
|
||||||
#include <stdio.h>
|
#include <stdio.h>
|
||||||
|
@ -485,7 +485,7 @@ void lua_endblock (void)
|
||||||
*/
|
*/
|
||||||
int lua_storesubscript (void)
|
int lua_storesubscript (void)
|
||||||
{
|
{
|
||||||
static Byte code[2] = {STOREINDEXED, RETCODE0};
|
static Byte code[2] = {STOREINDEXED0, RETCODE0};
|
||||||
Object func;
|
Object func;
|
||||||
tag(&func) = LUA_T_FUNCTION; bvalue(&func) = code;
|
tag(&func) = LUA_T_FUNCTION; bvalue(&func) = code;
|
||||||
adjustC(3);
|
adjustC(3);
|
||||||
|
|
Loading…
Reference in New Issue