open.c
23.2 KB
-
re PR libfortran/59419 (Failing OPEN with FILE='xxx' and IOSTAT creates the file… · 1ede59e4
re PR libfortran/59419 (Failing OPEN with FILE='xxx' and IOSTAT creates the file 'xxx' after revision 196783) 2013-12-16 Jerry DeLisle <jvdelisle@gcc.gnu> PR libfortran/59419 * io/file_pos.c (st_rewind): Do proper return after generate_error. * io/open.c (edit_modes): Move action code inside block that checks for library ok. (new_unit): Do cleanup after error. (st_open): Do proper return after error. * io/transfer.c (data_transfer_init): Likewise. From-SVN: r206039
Jerry DeLisle committed