diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2015-01-23 02:01:10 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2015-01-23 02:01:10 +0000 |
| commit | bb295963d4099db5c2822140430e950ac7f78894 (patch) | |
| tree | 256f68a04ba24948b248589c8686f27ea8f05fd4 /gcc | |
| parent | e344505cec510fe08af6c3263fc10619295ccd45 (diff) | |
| download | gcc-bb295963d4099db5c2822140430e950ac7f78894.zip gcc-bb295963d4099db5c2822140430e950ac7f78894.tar.gz gcc-bb295963d4099db5c2822140430e950ac7f78894.tar.bz2 | |
re PR fortran/61933 (Inquire on internal units)
2015-01-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
PR libgfortran/61933
* io/inquire.c (inquire_via_unit): Set existing to true for
any negative unit that is currently connected and any positive
units within range of KIND=4 value. The unit value for any out
of range case that may occur if the user is using a KIND=8 will
have been set to -2 which is reserved and can never be opened,
and therefore the unit does not exist.
From-SVN: r220024
Diffstat (limited to 'gcc')
0 files changed, 0 insertions, 0 deletions