]> git.ipfire.org Git - thirdparty/gcc.git/commit
re PR libfortran/33055 (Runtime error in INQUIRE unit existance with -fdefault-integer-8)
authorJerry DeLisle <jvdelisle@gcc.gnu.org>
Sun, 26 Aug 2007 22:04:48 +0000 (22:04 +0000)
committerJerry DeLisle <jvdelisle@gcc.gnu.org>
Sun, 26 Aug 2007 22:04:48 +0000 (22:04 +0000)
commit128997b6a50945943c47b02ca4d743e22e4d4786
tree179fe2796441d99ba4d1e150090496d54cca0623
parent070b797d0a7c4032bcadf58a0b29a4cc65fd5587
re PR libfortran/33055 (Runtime error in INQUIRE unit existance with -fdefault-integer-8)

2007-08-26  Jerry DeLisle  <jvdelisle@gcc.gnu.org>

PR fortran/33055
* trans-io.c (create_dummy_iostat): New function to create a unique
dummy variable expression to use with IOSTAT.
(gfc_trans_inquire): Use the new function to pass unit number error info
to run-time library if a regular IOSTAT variable was not given.

PR libfortran/33055
* io/inquire.c (inquire_via_unit):  If inquiring by unit, check for
an error condition from the IOSTAT variable and set EXIST to false if
there was a bad unit number.

From-SVN: r127817
gcc/fortran/ChangeLog
gcc/fortran/trans-io.c
libgfortran/ChangeLog
libgfortran/io/inquire.c