gforth/engine/libcc.h.in - diff

Return to libcc.h.in CVS log

Up to [gforth] / gforth / engine

Diff for /gforth/engine/libcc.h.in between versions 1.6 and 1.7

version 1.6, 2008/10/06 19:31:36	version 1.7, 2008/10/06 20:09:07
Line 39 extern Cell *gforth_RP;	Line 39 extern Cell *gforth_RP;
extern char *gforth_LP;	extern char *gforth_LP;
extern char *gforth_UP;	extern char *gforth_UP;
extern void gforth_engine(void , Cell , Cell , Float , char , char *);	extern void gforth_engine(void , Cell , Cell , Float , char , char *);
#ifdef HAS_FILE	extern char cstr(char from, Cell size, int clear)
extern char cstr(char from, UCell size, int clear)	extern char tilde_cstr(char from, Cell size, int clear)
extern char tilde_cstr(char from, UCell size, int clear)
#endif
#define GFORTH_ARGS void	#define GFORTH_ARGS void
#else	#else
#define gforth_SP ((Cell *)(gforth_pointers[0]))	#define gforth_SP ((Cell *)(gforth_pointers[0]))
Line 51 extern char tilde_cstr(char from, UCel	Line 49 extern char tilde_cstr(char from, UCel
#define gforth_RP ((Cell *)(gforth_pointers[3]))	#define gforth_RP ((Cell *)(gforth_pointers[3]))
#define gforth_UP ((char *)(gforth_pointers[4]))	#define gforth_UP ((char *)(gforth_pointers[4]))
#define gforth_engine ((char ()(Xt , Cell , Cell , Float , char , char ))(((void **)(gforth_pointers[5]))))	#define gforth_engine ((char ()(Xt , Cell , Cell , Float , char , char ))(((void **)(gforth_pointers[5]))))
#ifdef HAS_FILE	#define cstr ((char ()(char , Cell, int))(((void *)(gforth_pointers[6]))))
#define cstr ((char ()(char , UCell , int))(((void **)(gforth_pointers[6]))))	#define tilde_cstr ((char ()(char , Cell, int))(((void *)(gforth_pointers[7]))))
#define tilde_cstr ((char ()(char , UCell , int))(((void **)(gforth_pointers[7]))))
#endif
#define GFORTH_ARGS void ** gforth_pointers	#define GFORTH_ARGS void ** gforth_pointers
#endif	#endif

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.6
changed lines
	Added in v.1.7