2006-07-07 00:07:18 -04:00
|
|
|
#define FACTOR_CPU_STRING "ppc"
|
|
|
|
|
|
|
|
|
|
register CELL ds asm("r14");
|
|
|
|
|
register CELL rs asm("r15");
|
2019-10-18 09:05:06 -04:00
|
|
|
register void **primitives asm("r17");
|
2006-07-07 00:07:18 -04:00
|
|
|
|
2006-09-24 22:29:52 -04:00
|
|
|
void flush_icache(CELL start, CELL len);
|
2019-10-18 09:05:04 -04:00
|
|
|
|
|
|
|
|
void *native_stack_pointer(void);
|
|
|
|
|
|
|
|
|
|
#define PREVIOUS_FRAME(frame) (frame->previous)
|
|
|
|
|
#define RETURN_ADDRESS(frame) (frame->return_address)
|
2019-10-18 09:05:06 -04:00
|
|
|
|
|
|
|
|
INLINE void execute(F_WORD* word)
|
|
|
|
|
{
|
|
|
|
|
word->xt(word);
|
|
|
|
|
}
|
