mirrors/ecl
1
Fork 0
mirror of https://gitlab.com/embeddable-common-lisp/ecl.git synced 2026-01-27 06:51:44 -08:00
Code Issues Projects Releases Packages Wiki Activity

When ECL_OFFSET_TABLE is empty, there is a syntax error in C

Browse source
This commit is contained in:
Juan Jose Garcia Ripoll 2008-06-26 23:00:55 +02:00
parent 472a221691
commit 512db25ecd
2 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/c/interpreter.d
View file

@ -501,7 +501,7 @@ close_around(cl_object fun, cl_object lex) {
cl_object
ecl_interpret(cl_object frame, cl_object env, cl_object bytecodes, cl_index offset)
{
ECL_OFFSET_TABLE;
ECL_OFFSET_TABLE
typedef struct cl_env_struct *cl_env_ptr;
const cl_env_ptr the_env = &cl_env;
volatile bds_ptr old_bds_top = cl_env.bds_top;

2
src/h/bytecodes.h
View file

@ -243,5 +243,5 @@ typedef int16_t cl_oparg;
&&LBL_OP_PUSHNIL - &&LBL_OP_NOP,\
&&LBL_OP_STEPIN - &&LBL_OP_NOP,\
&&LBL_OP_STEPCALL - &&LBL_OP_NOP,\
&&LBL_OP_STEPOUT - &&LBL_OP_NOP }
&&LBL_OP_STEPOUT - &&LBL_OP_NOP };
#endif