mirror of
https://github.com/lua/lua.git
synced 2024-11-27 12:13:38 +08:00
d6af81084d
String literal expressions have their own kind VKSTR, instead of the generic VK. This allows strings to "cross" functions without entering their constant tables (e.g., if they are used only by some nested function).
97 lines
3.5 KiB
C
97 lines
3.5 KiB
C
/*
|
|
** $Id: lcode.h $
|
|
** Code generator for Lua
|
|
** See Copyright Notice in lua.h
|
|
*/
|
|
|
|
#ifndef lcode_h
|
|
#define lcode_h
|
|
|
|
#include "llex.h"
|
|
#include "lobject.h"
|
|
#include "lopcodes.h"
|
|
#include "lparser.h"
|
|
|
|
|
|
/*
|
|
** Marks the end of a patch list. It is an invalid value both as an absolute
|
|
** address, and as a list link (would link an element to itself).
|
|
*/
|
|
#define NO_JUMP (-1)
|
|
|
|
|
|
/*
|
|
** grep "ORDER OPR" if you change these enums (ORDER OP)
|
|
*/
|
|
typedef enum BinOpr {
|
|
OPR_ADD, OPR_SUB, OPR_MUL, OPR_MOD, OPR_POW,
|
|
OPR_DIV,
|
|
OPR_IDIV,
|
|
OPR_BAND, OPR_BOR, OPR_BXOR,
|
|
OPR_SHL, OPR_SHR,
|
|
OPR_CONCAT,
|
|
OPR_EQ, OPR_LT, OPR_LE,
|
|
OPR_NE, OPR_GT, OPR_GE,
|
|
OPR_AND, OPR_OR,
|
|
OPR_NOBINOPR
|
|
} BinOpr;
|
|
|
|
|
|
#define luaK_codeABC(fs,o,a,b,c) luaK_codeABCk(fs,o,a,b,c,0)
|
|
|
|
|
|
typedef enum UnOpr { OPR_MINUS, OPR_BNOT, OPR_NOT, OPR_LEN, OPR_NOUNOPR } UnOpr;
|
|
|
|
|
|
/* get (pointer to) instruction of given 'expdesc' */
|
|
#define getinstruction(fs,e) ((fs)->f->code[(e)->u.info])
|
|
|
|
|
|
#define luaK_setmultret(fs,e) luaK_setreturns(fs, e, LUA_MULTRET)
|
|
|
|
#define luaK_jumpto(fs,t) luaK_patchlist(fs, luaK_jump(fs), t)
|
|
|
|
LUAI_FUNC int luaK_code (FuncState *fs, Instruction i);
|
|
LUAI_FUNC int luaK_codeABx (FuncState *fs, OpCode o, int A, unsigned int Bx);
|
|
LUAI_FUNC int luaK_codeAsBx (FuncState *fs, OpCode o, int A, int Bx);
|
|
LUAI_FUNC int luaK_codeABCk (FuncState *fs, OpCode o, int A,
|
|
int B, int C, int k);
|
|
LUAI_FUNC int luaK_isKint (expdesc *e);
|
|
LUAI_FUNC int luaK_exp2const (FuncState *fs, const expdesc *e, TValue *v);
|
|
LUAI_FUNC void luaK_fixline (FuncState *fs, int line);
|
|
LUAI_FUNC void luaK_nil (FuncState *fs, int from, int n);
|
|
LUAI_FUNC void luaK_reserveregs (FuncState *fs, int n);
|
|
LUAI_FUNC void luaK_checkstack (FuncState *fs, int n);
|
|
LUAI_FUNC void luaK_int (FuncState *fs, int reg, lua_Integer n);
|
|
LUAI_FUNC void luaK_dischargevars (FuncState *fs, expdesc *e);
|
|
LUAI_FUNC int luaK_exp2anyreg (FuncState *fs, expdesc *e);
|
|
LUAI_FUNC void luaK_exp2anyregup (FuncState *fs, expdesc *e);
|
|
LUAI_FUNC void luaK_exp2nextreg (FuncState *fs, expdesc *e);
|
|
LUAI_FUNC void luaK_exp2val (FuncState *fs, expdesc *e);
|
|
LUAI_FUNC int luaK_exp2RK (FuncState *fs, expdesc *e);
|
|
LUAI_FUNC void luaK_self (FuncState *fs, expdesc *e, expdesc *key);
|
|
LUAI_FUNC void luaK_indexed (FuncState *fs, expdesc *t, expdesc *k);
|
|
LUAI_FUNC void luaK_goiftrue (FuncState *fs, expdesc *e);
|
|
LUAI_FUNC void luaK_goiffalse (FuncState *fs, expdesc *e);
|
|
LUAI_FUNC void luaK_storevar (FuncState *fs, expdesc *var, expdesc *e);
|
|
LUAI_FUNC void luaK_setreturns (FuncState *fs, expdesc *e, int nresults);
|
|
LUAI_FUNC void luaK_setoneret (FuncState *fs, expdesc *e);
|
|
LUAI_FUNC int luaK_jump (FuncState *fs);
|
|
LUAI_FUNC void luaK_ret (FuncState *fs, int first, int nret);
|
|
LUAI_FUNC void luaK_patchlist (FuncState *fs, int list, int target);
|
|
LUAI_FUNC void luaK_patchtohere (FuncState *fs, int list);
|
|
LUAI_FUNC void luaK_concat (FuncState *fs, int *l1, int l2);
|
|
LUAI_FUNC int luaK_getlabel (FuncState *fs);
|
|
LUAI_FUNC void luaK_prefix (FuncState *fs, UnOpr op, expdesc *v, int line);
|
|
LUAI_FUNC void luaK_infix (FuncState *fs, BinOpr op, expdesc *v);
|
|
LUAI_FUNC void luaK_posfix (FuncState *fs, BinOpr op, expdesc *v1,
|
|
expdesc *v2, int line);
|
|
LUAI_FUNC void luaK_settablesize (FuncState *fs, int pc,
|
|
int ra, int rb, int rc);
|
|
LUAI_FUNC void luaK_setlist (FuncState *fs, int base, int nelems, int tostore);
|
|
LUAI_FUNC void luaK_finish (FuncState *fs);
|
|
LUAI_FUNC l_noret luaK_semerror (LexState *ls, const char *msg);
|
|
|
|
|
|
#endif
|