fix failure to read infinity in scanf

this code worked in strtod, but not in scanf. more evidence that i
should design a better interface for discarding multiple tail
characters than just calling unget repeatedly...

diff --git a/src/internal/floatscan.c b/src/internal/floatscan.c
index 377a008bd86600602c6d1fd877c47f2fa6b26626..da209e278e14e5abe0a39aa5cf59854696207df8 100644 (file)
--- a/src/internal/floatscan.c
+++ b/src/internal/floatscan.c
@@ -428,9 +428,10 @@ long double __floatscan(FILE *f, int c, int prec, int pok)
        for (i=0; i<8 && (c|32)=="infinity"[i]; i++)
                if (i<7) c = shgetc(f);
        if (i==3 || i==8 || (i>3 && pok)) {
-               if (i==3) shunget(f);
-               if (pok) for (; i>3; i--) shunget(f);
-               else shlim(f, 0);
+               if (i!=8) {
+                       shunget(f);
+                       if (pok) for (; i>3; i--) shunget(f);
+               }
                return sign * INFINITY;
        }
        if (!i) for (i=0; i<3 && (c|32)=="nan"[i]; i++)