------- Comment #33 from spark at gcc dot gnu dot org 2007-03-26 16:54 ------- (In reply to comment #31) > 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); > }
This patch doesn't break 200.sixtrack (when added on top of the Jerry's previous patch above). -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31052