readhexa
r = readhexa(&s, r, &i); /* read integer part */
r = readhexa(&s, r, &e); /* read fractional part */
