I am developping a Fortran program whith a MetaCard interface.
The SGI version works fine and I am porting it to HP
(and soon to Alpha). Up to now it does not works on HP since
I can't find an equivalent to the CALL Flush(Unit) of the
SGI Fortran. I need it to flush the Fortran output to the
standard output logical unit. Without that Flush after each
Fortran write metacard hangs.
There is no Subroutine Flush() in the hp Fortran but I found
a fflush() function in the libc:
int fflush(FILE *stream);
I tried to call it from the hp Fortran code with no success
iErr = fflush(0) ! null pointer
if (iErr.ne.0) Write ---> error message
However I admit that I don't understand what should be really
passed to that function if called from Fortran. I find no example
in the HP doc.
Can you help me ?
Kind regards
A.Filhol
------ What I do in metacard --------
open process myprocess
----
on myread
read from process myprocess until return in 30 ticks
----
----
on mywrite data
write data & return to process myprocess
----
----
--------------------------------------
----------------------------------------------------------
_/ _/ _/ A.Filhol, Science
_/ _/ _/ Institut Laue Langevin
_/ _/ _/ Division/Scientific Computing
_/ _/ _/ B.P. 156
_/ _/_/_/_/ _/_/_/_/ F-38042 Grenoble Cedex 9, France
Tel: (33) 76.20.71.56; Fax: (33) 76.48.39.06; e-mail: filhol@ill.fr