todigit
buf[--bp] = (todigit(*end) >> (8 - shift))
#define toxdigit(c) ((isdigit(c))?todigit(c):(toupper(c)-(int)'A'+10))
*--suffix = todigit(n % 10);
buf[--bp] = (todigit(*end) >> (8 - shift))
#define toxdigit(c) ((isdigit(c))?todigit(c):(toupper(c)-(int)'A'+10))
*--suffix = todigit(nn % 10);
*--suffix = todigit(nn);
*--suffix = todigit(nn % 10);
*--suffix = todigit(nn);
buf[--bp] = (todigit(*end) >> (8 - shift))
#define toxdigit(c) ((isdigit(c))?todigit(c):(toupper(c)-(int)'A'+10))
*--suffix = todigit(nn % 10);
*--suffix = todigit(nn);