gforth/engine/engine.c - diff

Return to engine.c CVS log

Up to [gforth] / gforth / engine

version 1.84, 2005/08/21 22:09:14	version 1.86, 2005/12/27 09:35:45
Line 241 extern int gforth_memcmp(const char * s1	Line 241 extern int gforth_memcmp(const char * s1
}	}
#endif	#endif

#ifdef HAS_FFCALL	#if defined(HAS_FFCALL) \|\| defined(HAS_LIBFFI)
#define SAVE_REGS IF_fpTOS(fp[0]=fpTOS); SP=sp; FP=fp; RP=rp; LP=lp;	#define SAVE_REGS IF_fpTOS(fp[0]=fpTOS); SP=sp; FP=fp; RP=rp; LP=lp;
#define REST_REGS sp=SP; fp=FP; rp=RP; lp=LP; IF_fpTOS(fpTOS=fp[0]);	#define REST_REGS sp=SP; fp=FP; rp=RP; lp=LP; IF_fpTOS(fpTOS=fp[0]);
#endif	#endif
Line 259 extern int gforth_memcmp(const char * s1	Line 259 extern int gforth_memcmp(const char * s1
#define VARIANT(v) (v)	#define VARIANT(v) (v)
#define JUMP(target) goto I_noop	#define JUMP(target) goto I_noop
#define LABEL(name) H_##name: SKIP16; I_##name:	#define LABEL(name) H_##name: SKIP16; I_##name:
#define IN_ENGINE2

#elif ENGINE==3	#elif ENGINE==3
/* variant with different immediate arguments for finding out	/* variant with different immediate arguments for finding out