test

Sun Studio 12: Fortran ライブラリ・リファレンス

1.4.37.2 gerror: 最後に検出されたシステムエラーの取得

サブルーチンまたは関数は、次のように呼び出します。

call gerror( string )

string

character*n

出力 

最後に検出されたシステムエラーのメッセージ 

例 2: gerror() のサブルーチンとしての使用


       character string*30
       …
       call gerror ( string )
       write(*,*) string

例 3: gerror() の関数としての使用 (この場合、string は使用しません)


       character gerror*30, z*30
       …
       z = gerror( )
       write(*,*) z