lisxdigit
if (lisxdigit(ls->current) || ls->current == '.')
if (!lisxdigit(c[i]))
for (; lisxdigit(cast_uchar(**s)); (*s)++) { /* read integer part */