JRET
#define isret(n) ((n)->csub == JRET)
static Cell retcell = { OJUMP, JRET, NULL, NULL, 0.0, NUM, NULL };