DIGIT
if ((digit = DIGIT(*addr)) == -1) {
if ((digit2 = DIGIT(*addr)) != -1) {
} else if (DIGIT(*addr) != -1) {
case GOTTWO | DIGIT:
case VIRGIN | DIGIT:
case GOTONE | DIGIT:
val = (DIGIT(*str) << 6) + (DIGIT(*(str + 1)) << 3) +
DIGIT(*(str + 2));
val = DIGIT(*(str + 2));
val = (val << 4) + DIGIT(*(str + 3));