ulton
xp->str = str_save(ulton((unsigned long)c, 10), ATEMP);
char * ulton ARGS((unsigned long, int));
p = ulton((neg) ? -n : n, 10);