extern XT primitives[];
#define PRIMITIVE_COUNT 76
CELL primitive_to_xt(CELL primitive);
void primitive_eq(void);
void primitive_address_of(void);