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

["dominiq at lps dot ens dot fr" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #16 from dominiq at lps dot ens dot fr  2007-02-08 08:45 -------
Subject: Re:  recursive I/O hangs under OSX

> Try :
> ...
> Or increase the size of string.

I have increased the length to 20 and in both cases the executable
(for an invalid code!-) works on OSX.

I have also tried:

external fun
character(20) :: fun
i=2
print trim(fun(i)), 99
end
function fun(i)
character(20) :: fun
integer :: i
write(fun,'(A2,I0,A)') "(I", I, ")"
end

which works. Is this last code valid for f95 (-std=f95 does give any
diagnostic)
and/or f2003?

Anyway the hanging seems due to the recursive access to external I/O.
If I want to corner the problem, where should I look?  With directions I can
try to locate the problem and test possible fixes.


-- 


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