ref: b548687a8ed1d0a159c9d3f3f921d93bbb56908e
dir: /os/pc64/forth.head.h/
/*
* Forth dictionary
*/
enum {
Sourceline,
Here,
There,
Byte, /* obsolete, all are counted strings now */
Chars,
Absolute,
Absoluteptr,
Relative, /* fmem+ value, for defined memory locations */
Relativevar, /* fmem+FORTHVARS+ value */
Relativedictionary, /* fmem+DICTIONARY+ value */
Dtop,
End
};
typedef struct Fentry Fentry;
struct Fentry
{
int what; /* Source line or Here or There or Dtop value */
char desc[1024];
int type; /* Byte, Chars, Absolute, Relative, End */
intptr here;
intptr there;
/* union { */
intptr p; /* for Absolute and Relative */
s8 b; /* for immediates, write the value as immediate + length */
char str[128];
void *ptr;
/* }; */
};