From d1ea38580ae35a3a34e7122c41682af7f9901030 Mon Sep 17 00:00:00 2001 From: Roberto Ierusalimschy Date: Fri, 3 Mar 2000 15:53:17 -0300 Subject: change of code generation design (independent functions for each opcode) --- lcode.h | 25 ++++++++++++++----------- 1 file changed, 14 insertions(+), 11 deletions(-) (limited to 'lcode.h') diff --git a/lcode.h b/lcode.h index 23a26dc7..0ba83766 100644 --- a/lcode.h +++ b/lcode.h @@ -1,5 +1,5 @@ /* -** $Id: lcode.h,v 1.1 2000/02/22 13:31:19 roberto Exp roberto $ +** $Id: lcode.h,v 1.2 2000/03/03 12:33:59 roberto Exp roberto $ ** Code generator for Lua ** See Copyright Notice in lua.h */ @@ -13,20 +13,23 @@ #include "lparser.h" +#define luaK_0(ls,o,d) luaK_code(ls, CREATE_0(o), d) +#define luaK_U(ls,o,u,d) luaK_code(ls, CREATE_U(o,u), d) +#define luaK_S(ls,o,s,d) luaK_code(ls, CREATE_S(o,s), d) +#define luaK_AB(ls,o,a,b,d) luaK_code(ls, CREATE_AB(o,a,b), d) + + void luaK_error (LexState *ls, const char *msg); int luaK_primitivecode (LexState *ls, Instruction i); -int luaK_code (LexState *ls, Instruction i); +int luaK_code (LexState *ls, Instruction i, int delta); +void luaK_retcode (LexState *ls, int nlocals, listdesc *e); void luaK_fixjump (LexState *ls, int pc, int dest); void luaK_deltastack (LexState *ls, int delta); -int luaK_0 (LexState *ls, OpCode op, int delta); -int luaK_U (LexState *ls, OpCode op, int u, int delta); -int luaK_S (LexState *ls, OpCode op, int s, int delta); -int luaK_AB (LexState *ls, OpCode op, int a, int b, int delta); -int luaK_kstr (LexState *ls, int c); -int luaK_number (LexState *ls, real f); -int luaK_adjuststack (LexState *ls, int n); -int luaK_iscall (LexState *ls, int pc); -void luaK_setcallreturns (LexState *ls, int pc, int nresults); +void luaK_kstr (LexState *ls, int c); +void luaK_number (LexState *ls, real f); +void luaK_adjuststack (LexState *ls, int n); +int luaK_iscall (LexState *ls, int hasjumps); +void luaK_setcallreturns (LexState *ls, int hasjumps, int nresults); void luaK_2stack (LexState *ls, expdesc *var); void luaK_storevar (LexState *ls, const expdesc *var); void luaK_prefix (LexState *ls, int op, expdesc *v); -- cgit v1.2.3-55-g6feb