[Bug fortran/59700] [4.8/4.9 Regression] Misleading/buggy runtime error message: Bad integer for item 0 in list input

[dominiq at lps dot ens.fr]

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

--- Comment #12 from Dominique d'Humieres <dominiq at lps dot ens.fr> ---
With the second patch there is a regression for gfortran.dg/namelist_46.f90.
This seems to be fixed with the following change:

@@ -757,14 +757,16 @@ read_logical (st_parameter_dt *dtp, int 

  bad_logical:

-  free_line (dtp);
-
   if (nml_bad_return (dtp, c))
-    return;
+    {
+      free_line (dtp);
+      return;
+    }

   free_saved (dtp);
   if (c == EOF)
     {
+      free_line (dtp);
       hit_eof (dtp);
       return;
     }

Only checked with

make -k check-gfortran RUNTESTFLAGS="dg.exp=namelist_46.f90
--target_board=unix'{-m32,-m64}'"