[BACK]Return to libcc.h.in CVS log [TXT] [DIR] Up to [gforth] / gforth / engine

Diff for /gforth/engine/libcc.h.in between versions 1.11 and 1.13

version 1.11, 2012/03/17 01:36:04 version 1.13, 2012/03/22 16:27:11
Line 19 Line 19
 */  */
   
 #include <gforth/@PACKAGE_VERSION@/config.h>  #include <gforth/@PACKAGE_VERSION@/config.h>
   #include <setjmp.h>
   
 #if defined(_WIN32) || defined(__WIN32__) || defined(__CYGWIN__)  #if defined(_WIN32) || defined(__WIN32__) || defined(__CYGWIN__) || defined(__ANDROID__)
 #undef HAS_BACKLINK  #undef HAS_BACKLINK
 #else  #else
 #define HAS_BACKLINK 1  #define HAS_BACKLINK 1
Line 41  extern __thread char *gforth_UP; Line 42  extern __thread char *gforth_UP;
 extern void *gforth_engine(void *, Cell *, Cell *, Float *, char *);  extern void *gforth_engine(void *, Cell *, Cell *, Float *, char *);
 extern char *cstr(char *from, Cell size);  extern char *cstr(char *from, Cell size);
 extern char *tilde_cstr(char *from, Cell size);  extern char *tilde_cstr(char *from, Cell size);
   extern __thread jmp_buf throw_jmp_buf;
 #define GFORTH_ARGS void  #define GFORTH_ARGS void
 #else  #else
 #define gforth_SP *((Cell **)(gforth_pointers[0]))  #define gforth_SP *((Cell **)(gforth_pointers(0)))
 #define gforth_FP *((Float **)(gforth_pointers[1]))  #define gforth_FP *((Float **)(gforth_pointers(1)))
 #define gforth_LP *((char **)(gforth_pointers[2]))  #define gforth_LP *((char **)(gforth_pointers(2)))
 #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 *))(((void **)(gforth_pointers[5]))))  #define gforth_engine ((char *(*)(void *, Cell *, Cell *, Float *, char *))(((void **)(gforth_pointers(5)))))
 #define cstr ((char *(*)(char *, Cell))(((void **)(gforth_pointers[6]))))  #define cstr ((char *(*)(char *, Cell))(((void **)(gforth_pointers(6)))))
 #define tilde_cstr ((char *(*)(char *, Cell))(((void **)(gforth_pointers[7]))))  #define tilde_cstr ((char *(*)(char *, Cell))(((void **)(gforth_pointers(7)))))
 #define GFORTH_ARGS void ** gforth_pointers   #define throw_jmp_buf *((jmp_buf*)(gforth_pointers(8)))
   #define GFORTH_ARGS void *(*gforth_pointers)(Cell)
 #endif  #endif
   
 #define CELL_BITS       (sizeof(Cell) * 8)  #define CELL_BITS       (sizeof(Cell) * 8)
Removed from v.1.11  
changed lines
  Added in v.1.13

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