return scalbnl(y, e2);
}
-long double __floatscan(FILE *f, int c, int prec, int pok)
+long double __floatscan(FILE *f, int prec, int pok)
{
int sign = 1;
int i;
int bits;
int emin;
+ int c;
switch (prec) {
case 0:
return 0;
}
- if (c<0) c = shgetc(f);
+ while (isspace((c=shgetc(f))));
if (c=='+' || c=='-') {
sign -= 2*(c=='-');
#include <stdio.h>
-long double __floatscan(FILE *, int, int, int);
+long double __floatscan(FILE *, int, int);
#endif
errno = EINVAL;
return 0;
}
- c = shgetc(f);
+ while (isspace((c=shgetc(f))));
if (c=='+' || c=='-') {
neg = -(c=='-');
c = shgetc(f);
case 'e': case 'E':
case 'f': case 'F':
case 'g': case 'G':
- y = __floatscan(f, -1, size, 0);
+ y = __floatscan(f, size, 0);
if (!shcnt(f)) goto match_fail;
if (dest) switch (size) {
case SIZE_def:
static long double strtox(const char *s, char **p, int prec)
{
- char *t = (char *)s;
- while (isspace(*t)) t++;
FILE f = {
- .buf = (void *)t, .rpos = (void *)t,
+ .buf = (void *)s, .rpos = (void *)s,
.rend = (void *)-1, .lock = -1
};
shlim(&f, 0);
- long double y = __floatscan(&f, -1, prec, 1);
+ long double y = __floatscan(&f, prec, 1);
off_t cnt = shcnt(&f);
- if (p) *p = cnt ? t + cnt : (char *)s;
+ if (p) *p = cnt ? (char *)s + cnt : (char *)s;
return y;
}