Diff for /gforth/engine/forth.h between versions 1.126 and 1.127

version 1.126, 2012/07/23 13:27:48 version 1.127, 2012/07/23 14:15:52
Line 326  typedef struct { Line 326  typedef struct {
   UCell locals_stack_size;    UCell locals_stack_size;
   Xt *boot_entry;       /* initial ip for booting (in BOOT) */    Xt *boot_entry;       /* initial ip for booting (in BOOT) */
   Xt *throw_entry;      /* ip after signal (in THROW) */    Xt *throw_entry;      /* ip after signal (in THROW) */
   Cell unused1;         /* possibly tib stack size */    Xt *quit_entry;
     Xt *execute_entry;
   Label *xt_base;         /* base of DOUBLE_INDIRECT xts[], for comp-i.fs */    Label *xt_base;         /* base of DOUBLE_INDIRECT xts[], for comp-i.fs */
 } ImageHeader;  } ImageHeader;
 /* the image-header is created in main.fs */  /* the image-header is created in main.fs */
Line 398  int gforth_main(int argc, char **argv, c Line 399  int gforth_main(int argc, char **argv, c
 void gforth_args(int argc, char ** argv, char ** path, char ** imagename);  void gforth_args(int argc, char ** argv, char ** path, char ** imagename);
 Address gforth_loader(char* imagename, char* path);  Address gforth_loader(char* imagename, char* path);
 user_area* gforth_stacks(Cell dsize, Cell rsize, Cell fsize, Cell lsize);  user_area* gforth_stacks(Cell dsize, Cell rsize, Cell fsize, Cell lsize);
 int gforth_go(void *image, int stack, Cell *entries);  int gforth_go(Xt* ip0);
 void gforth_cleanup();  void gforth_cleanup();
 void gforth_printmetrics();  void gforth_printmetrics();
   

Removed from v.1.126  
changed lines
  Added in v.1.127


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