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