This is the mail archive of the gcc-bugs@gcc.gnu.org mailing list for the GCC project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

[Bug libfortran/31052] Bad IOSTAT values when readings NAMELISTs past EOF



------- Comment #31 from jvdelisle at gcc dot gnu dot org  2007-03-26 07:00 -------
Here is a new patch.  I need someone to test on SPEC.  It is very simple.

Index: transfer.c
===================================================================
*** transfer.c  (revision 123205)
--- transfer.c  (working copy)
*************** next_record_r (st_parameter_dt *dtp)
*** 2228,2234 ****
        break;
      }

!   if (dtp->u.p.current_unit->flags.access == ACCESS_SEQUENTIAL)
      test_endfile (dtp->u.p.current_unit);
  }

--- 2228,2235 ----
        break;
      }

!   if (dtp->u.p.current_unit->flags.access == ACCESS_SEQUENTIAL
!       && !dtp->u.p.namelist_mode)
      test_endfile (dtp->u.p.current_unit);
  }



-- 


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


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]