I/O バッファーのフラッシュ

プログラムが予期せずに終了した場合にデータが失われないようにするために、 FLUSH ステートメントまたは flush_ サブルーチンを使用して、バッファーに入れたデータをファイルに書き込むことができます。(移植性を高めるためには、FLUSH ステートメントが推奨されます。) 次の例は、flush_ サブルーチンの使用法を示しています。

USE XLFUTILITY
INTEGER, PARAMETER :: UNIT=10
 
DO I=1,1000000
    WRITE (10,*) I
    CALL MIGHT_CRASH
! If the program ends in the middle of the loop, some data
! may be lost.
END DO
 
DO I=1,1000000
    WRITE (10,*) I
    CALL FLUSH_(UNIT)
    CALL MIGHT_CRASH
! If the program ends in the middle of the loop, all data written
! up to that point will be safely in the file.
END DO
 
END
関連情報:
混合言語の入出力 および 「XL Fortran ランゲージ・リファレンス」の 『FLUSH』ステートメントを参照してください。
IBM Copyright 2003