g77 bug, maybe.

[Dave Love]

>>>>> "milgram" == milgram  <milgram@eng.umd.edu> writes:

 milgram> In a statement like
 milgram> X
 milgram> write (6,100) f(x)
 milgram> X
 milgram> if the external function f starts a write statement, I get:
 milgram> X
 milgram> I/O recursion: I/O started while already doing I/O
 milgram> X
 milgram> same thing with f2c.
 milgram> X
 milgram> below is a quick demo program and output. I'm using egcs, see below
 milgram> for more details.  Not certain this is a bug w/r/t f77
 milgram> standard, 

It isn't.  A version of the standard on the net is referenced in the
g77 manual.  See
<URL: http://www.fortran.com/fortran/F77_std/rjcnf0001-sh-12.html#sh-12.11 >.
Likewise the current (f95) standard.

 milgram> but it's not the best behavior.  

Well, it's better than falling over more mysteriously (as would
earlier versions in similar circumstances, consistent with at least
some proprietary compilers' runtime).