将消息写入 FORTRAN 逻辑单元 0。
该消息针对最近检测到的系统错误。string 是字符输入参数。它写在标准错误消息前面。
示例 1:perror:
... CALL perror ( "file is for formated I/O" ) ...
返回系统错误消息。
string 是字符输出参数。
示例 2:gerror,用作子例程:
CHARACTER string*30 ... CALL gerror ( string ) WRITE(*,*) string END
示例 3:gerror,用作函数;在本例中,未使用 string:
CHARACTER gerror*30, z*30 ... z = gerror( ) WRITE(*,*) z END
返回最近检测到的系统错误的错误编号。
此编号仅在错误实际发生时更新。可能生成此类错误的大多数例程会在调用后返回错误代码;该值是较可靠的错误原因指示器。
示例 4:ierrno:
INTEGER ierrno, n ... n = ierrno ( ) WRITE(*,*) n END
libfui.a
intro(2)、perror(3F)
对 perror 的调用中的 string 长度不能超过 127 个字符。
gerror 返回的字符串长度取决于调用程序。