1984-05-19 11:42:19 +00:00
|
|
|
/* $Header$ */
|
|
|
|
|
|
1984-05-18 21:27:39 +00:00
|
|
|
struct result {
|
|
|
|
|
int e_typ; /* EV_INT,EV_REG,EV_STR */
|
|
|
|
|
union {
|
|
|
|
|
word e_con;
|
|
|
|
|
int e_reg;
|
|
|
|
|
string e_str;
|
|
|
|
|
} e_v; /* value */
|
|
|
|
|
};
|
|
|
|
|
|
|
|
|
|
#define EV_UNDEF 0
|
|
|
|
|
#define EV_INT 1
|
|
|
|
|
#define EV_REG 2
|
|
|
|
|
#define EV_STR 3
|
|
|
|
|
|
|
|
|
|
typedef struct result result_t;
|
|
|
|
|
|
|
|
|
|
extern result_t compute();
|
