CASE_OP 284 core/vm.c CASE_OP(MOVE, (P, f, &asmb, pos)) // copy value between registers CASE_OP 285 core/vm.c CASE_OP(LOADPN, (P, f, &asmb, pos)) // load a value into a register CASE_OP 286 core/vm.c CASE_OP(LOADK, (P, f, &asmb, pos, need)) // load a constant into a register CASE_OP 287 core/vm.c CASE_OP(SELF, (P, f, &asmb, pos, need)) // prepare an object method for calling CASE_OP 289 core/vm.c CASE_OP(GETLOCAL, (P, f, &asmb, pos, regs))// read a local into a register CASE_OP 290 core/vm.c CASE_OP(SETLOCAL, (P, f, &asmb, pos, regs))// write a register value into a local CASE_OP 291 core/vm.c CASE_OP(GETUPVAL, (P, f, &asmb, pos, lregs))// read an upvalue (upper scope) CASE_OP 292 core/vm.c CASE_OP(SETUPVAL, (P, f, &asmb, pos, lregs))// write to an upvalue CASE_OP 293 core/vm.c CASE_OP(GLOBAL, (P, f, &asmb, pos, need)) // returns a global (for get or set) CASE_OP 294 core/vm.c CASE_OP(NEWTUPLE, (P, f, &asmb, pos, need))// create tuple CASE_OP 295 core/vm.c CASE_OP(SETTUPLE, (P, f, &asmb, pos, need))// write register into tuple key CASE_OP 296 core/vm.c CASE_OP(SETTABLE, (P, f, &asmb, pos, need))// write register into a table entry CASE_OP 297 core/vm.c CASE_OP(NEWLICK, (P, f, &asmb, pos, need))// create lick. R[a] := {} (size = b,c) CASE_OP 298 core/vm.c CASE_OP(GETPATH, (P, f, &asmb, pos, need))// read obj field into register CASE_OP 299 core/vm.c CASE_OP(SETPATH, (P, f, &asmb, pos, need))// write into obj field CASE_OP 300 core/vm.c CASE_OP(ADD, (P, f, &asmb, pos, need)) // a = b + c CASE_OP 301 core/vm.c CASE_OP(SUB, (P, f, &asmb, pos, need)) // a = b - c CASE_OP 302 core/vm.c CASE_OP(MULT, (P, f, &asmb, pos, need)) CASE_OP 303 core/vm.c CASE_OP(DIV, (P, f, &asmb, pos, need)) CASE_OP 304 core/vm.c CASE_OP(REM, (P, f, &asmb, pos, need)) CASE_OP 305 core/vm.c CASE_OP(POW, (P, f, &asmb, pos, need)) CASE_OP 306 core/vm.c CASE_OP(NEQ, (P, f, &asmb, pos)) CASE_OP 307 core/vm.c CASE_OP(EQ, (P, f, &asmb, pos)) // if ((RK[b] == RK[c]) ~= a) then PC++ CASE_OP 308 core/vm.c CASE_OP(LT, (P, f, &asmb, pos)) // if ((RK[b] < RK[c]) ~= a) then PC++ CASE_OP 309 core/vm.c CASE_OP(LTE, (P, f, &asmb, pos)) // if ((RK[b] <= RK[c]) ~= a) then PC++ CASE_OP 310 core/vm.c CASE_OP(GT, (P, f, &asmb, pos)) CASE_OP 311 core/vm.c CASE_OP(GTE, (P, f, &asmb, pos)) CASE_OP 312 core/vm.c CASE_OP(BITN, (P, f, &asmb, pos, need)) CASE_OP 313 core/vm.c CASE_OP(BITL, (P, f, &asmb, pos, need)) CASE_OP 314 core/vm.c CASE_OP(BITR, (P, f, &asmb, pos, need)) CASE_OP 315 core/vm.c CASE_OP(DEF, (P, f, &asmb, pos, need)) // define a method for an object CASE_OP 316 core/vm.c CASE_OP(BIND, (P, f, &asmb, pos, need)) // extend obj by set a binding CASE_OP 318 core/vm.c CASE_OP(MSG, (P, f, &asmb, pos, need)) // call a method of an object CASE_OP 319 core/vm.c CASE_OP(JMP, (P, f, &asmb, pos, jmps, offs, &jmpc)) // PC += sBx CASE_OP 320 core/vm.c CASE_OP(TEST, (P, f, &asmb, pos)) // if not (R[a] <=> C) then PC++ CASE_OP 321 core/vm.c CASE_OP(NOT, (P, f, &asmb, pos)) // a = not b CASE_OP 322 core/vm.c CASE_OP(CMP, (P, f, &asmb, pos)) CASE_OP 323 core/vm.c CASE_OP(TESTJMP, (P, f, &asmb, pos, jmps, offs, &jmpc)) CASE_OP 324 core/vm.c CASE_OP(NOTJMP, (P, f, &asmb, pos, jmps, offs, &jmpc)) CASE_OP 325 core/vm.c CASE_OP(NAMED, (P, f, &asmb, pos, need)) // assign named args before a CALL CASE_OP 326 core/vm.c CASE_OP(CALL, (P, f, &asmb, pos, need)) // call a function. R[a],...:= R[a]( R[a+1],...,R[a+b-1] ) CASE_OP 327 core/vm.c CASE_OP(CALLSET, (P, f, &asmb, pos, need))//? set return register to write to CASE_OP 328 core/vm.c CASE_OP(RETURN, (P, f, &asmb, pos)) // return R[a], ... ,R[a+b-2] CASE_OP 329 core/vm.c CASE_OP(PROTO, (P, f, &asmb, &pos, lregs, need, regs))// define function prototype CASE_OP 330 core/vm.c CASE_OP(CLASS, (P, f, &asmb, pos, need)) // find class for register value