diff options
| author | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2008-01-20 06:33:49 +0000 |
|---|---|---|
| committer | Jerry DeLisle <jvdelisle@gcc.gnu.org> | 2008-01-20 06:33:49 +0000 |
| commit | 17c2c96cdcde260adce0c535e501f08371f5990e (patch) | |
| tree | dedbc43dcc55e290acd9a5c365727c56e2e2ac08 /gcc/fortran/trans-array.c | |
| parent | e08c673e0571253b8624c8c5d9a8886109c1adb2 (diff) | |
| download | gcc-17c2c96cdcde260adce0c535e501f08371f5990e.zip gcc-17c2c96cdcde260adce0c535e501f08371f5990e.tar.gz gcc-17c2c96cdcde260adce0c535e501f08371f5990e.tar.bz2 | |
inquire.c (inquire_via_unit): If a unit is opened...
2008-01-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
* io/inquire.c (inquire_via_unit): If a unit is opened, return values
according to the open action for DIRECT, FORMATTED, and UNFORMATTED.
(inquire_via_filename): Return "UNKNOWN" for SEQUENTIAL, DIRECT,
FORAMATTED, and UNFORMATTED inquiries.
* io/unix.c (inquire_sequential): Return "UNKNOWN" when appropriate
for files that are not opened. (inquire_direct): Same.
(inquire_formatted): Same.
From-SVN: r131672
Diffstat (limited to 'gcc/fortran/trans-array.c')
0 files changed, 0 insertions, 0 deletions