integer*4 function getc (char) character char
integer*4 function fgetc (lunit, char) character char
这些函数返回与某个 FORTRAN 逻辑单元关联的文件中的下一个字符,绕过正常的 FORTRAN I/O。
getc 从逻辑单元 5 进行读取,该单元通常连接到控制终端输入。
每个函数的值都是一个系统状态代码。零表示在读取时未发生错误;-1 表示检测到文件末尾。正值是 SunOS 系统错误代码或 f77 I/O 错误代码。请参见 perror(3F)。
不要将通常的 Fortran I/O 与 getc 或 fgetc 调用混合使用。
libfui.a
intro (2) 、 getc (3C) 、 perror (3F)