extern XT primitives[];
#define PRIMITIVE_COUNT 89

CELL primitive_to_xt(CELL primitive);

void primitive_eq(void);