[Bug libfortran/30617] recursive I/O hangs under OSX

[dominiq at lps dot ens dot fr]

------- Comment #14 from dominiq at lps dot ens dot fr  2007-02-07 19:55 -------
The test is known to fail on OSX 10.3 (gcc 4.3.0 20070202) and 10.4 (PPC with
gcc 4.2.0 20070124
and MacIntel gcc unknown).

When I have filled the PR I have forgotten to say that the same bug was present
in

http://gcc.gnu.org/viewcvs/trunk/gcc/testsuite/gfortran.dg/actual_array_interface_1.f90

see http://gcc.gnu.org/ml/fortran/2006-11/msg00394.html and following mails in
the thread
for details.

Note that the slightly modified code:

external fun
real fun
character(10) :: string
real a
a = fun()
print *, a
write(string,*) fun()
print *, string
end
real function fun()
print *, 'test'
fun = 1.0
end

gives

test
  1.000000    
test
At line 7 of file recursive_io.f90
Fortran runtime error: End of record

on both OSX and Linux.


-- 

dominiq at lps dot ens dot fr changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
            Summary|recursive I/O hangs under   |recursive I/O hangs under
                   |OSX 10.3                    |OSX


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=30617