Return to engine.c CVS log | Up to [gforth] / gforth |
version 1.35, 1996/02/09 17:34:08 | version 1.36, 1996/02/13 11:12:16 |
---|---|
Line 45 | Line 45 |
#define IOR(flag) ((flag)? -512-errno : 0) | #define IOR(flag) ((flag)? -512-errno : 0) |
typedef union { | |
struct { | |
#ifdef WORDS_BIGENDIAN | |
Cell high; | |
UCell low; | |
#else | |
UCell low; | |
Cell high; | |
#endif; | |
} cells; | |
DCell dcell; | |
} Double_Store; | |
typedef struct F83Name { | typedef struct F83Name { |
struct F83Name *next; /* the link field for old hands */ | struct F83Name *next; /* the link field for old hands */ |
char countetc; | char countetc; |