[Bug fortran/34404] [4.3 Regression] 168.wupwise in SPEC CPU 2000 miscompiled

[hjl at lucon dot org]

------- Comment #1 from hjl at lucon dot org  2007-12-09 12:14 -------
Revision 130708

http://gcc.gnu.org/viewcvs/trunk/libgfortran/io/list_read.c?r1=130708&r2=130707&pathrev=130708

has

@@ -1136,6 +1141,13 @@

  exp2:
   if (!isdigit (c))
+    {
+      if (c == 'i' || c == 'I' || c == 'n' || c == 'N')
+       goto inf_nan;
+      else
+       goto bad;
+    }
+
     goto bad; <------ Should be removed.
   push_char (dtp, c);

@@ -1166,6 +1178,41 @@


-- 

hjl at lucon dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |burnus at gcc dot gnu dot
                   |                            |org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34404