Path: utzoo!utgpu!news-server.csri.toronto.edu!bonnie.concordia.ca!uunet!zaphod.mps.ohio-state.edu!caen!news
From: oliveria@engin.umich.edu (ROQUE DONIZETE DE OLIVEIRA)
Newsgroups: comp.lang.fortran
Subject: flush doesn't work with dec3100 f77 compiler
Message-ID: <_Q1+34+@engin.umich.edu>
Date: 25 May 91 04:48:55 GMT
Organization: University of Michigan Engineering, Ann Arbor
Lines: 27

C Apparently the FLUSH routine doesn't work on the dec3100 (ultrix 3.1)
C and dec5000 (ultrix 4.1). It did work on a Sun Sparcstation and Apollo (you
C don't even need to flush on the apollos).
C To test it out, compile the program below, run it in the background, and
C monitor the output file (as fast as you can) using "cat out" several times
C (until program completion, 15 secs).
C If any Decstation user out there knowns what could be wrong, I would appreciate
C hearing about it.

      program tflush
c
c---- Tests routine "flush"
c
      iw = 10
      open (unit=iw,file='out')
c
      do 10 i = 1,5
        write(iw,*) i
        call flush(iw)
        call sleep(3)
 10   continue
c
      stop
      end

C Roque Oliveira
C oliveria@caen.engin.umich.edu