clearerr.gml

来自「开放源码的编译器open watcom 1.6.0版的源代码」· GML 代码 · 共 43 行

.func clearerr
#include <stdio.h>
void clearerr( FILE *fp );
.ixfunc2 '&StrIo' &func
.ixfunc2 '&Errs' &func
.funcend
.desc begin
The &func function clears the end-of-file and error indicators
for the stream pointed to by
.arg fp.
These indicators are cleared only when the file is opened or by an
explicit call to the &func or
.kw rewind
functions.
.desc end
.return begin
The &func function returns no value.
.return end
.see begin
.seelist &function. clearerr feof ferror perror strerror
.see end
.exmp begin
#include <stdio.h>

void main()
  {
    FILE *fp;
    int c;
.exmp break
    c = 'J';
    fp = fopen( "file", "w" );
    if( fp != NULL ) {
      fputc( c, fp );
      if( ferror( fp ) ) {  /* if error        */
        clearerr( fp );   /* clear the error */
        fputc( c, fp );   /* and retry it    */
      }
    }
  }
.exmp end
.class ANSI
.system