gforth/forth.h - diff

Return to forth.h CVS log

Up to [gforth] / gforth

version 1.16, 1995/10/11 19:39:33	version 1.18, 1995/10/26 22:48:39
Line 65 Label engine(Xt ip, Cell sp, Cell rp	Line 65 Label engine(Xt ip, Cell sp, Cell rp
#endif	#endif

#ifdef DEBUG	#ifdef DEBUG
# define NAME(string) fprintf(stderr,"%08x: "string"\n",(Cell)ip);	# define NAME(string) fprintf(stderr,"%08lx: "string"\n",(Cell)ip);
#else	#else
# define NAME(string)	# define NAME(string)
#endif	#endif
Line 76 Label engine(Xt ip, Cell sp, Cell rp	Line 76 Label engine(Xt ip, Cell sp, Cell rp

#ifndef FLUSH_ICACHE	#ifndef FLUSH_ICACHE
#warning flush-icache probably will not work (see manual)	#warning flush-icache probably will not work (see manual)
# define FLUSH_ICACHE(addr,size) 0	# define FLUSH_ICACHE(addr,size)
#endif	#endif

#ifdef DIRECT_THREADED	#ifdef DIRECT_THREADED
#define CACHE_FLUSH(addr,size) FLUSH_ICACHE(addr,size)	#define CACHE_FLUSH(addr,size) FLUSH_ICACHE(addr,size)
#else	#else
#define CACHE_FLUSH(addr,size) 0	#define CACHE_FLUSH(addr,size)
#endif	#endif