]> pd.if.org Git - pdclib/blob - functions/stdio/clearerr.c
Whitespace cleanups.
[pdclib] / functions / stdio / clearerr.c
1 /* clearerr( FILE * )
2
3    This file is part of the Public Domain C Library (PDCLib).
4    Permission is granted to use, modify, and / or redistribute at will.
5 */
6
7 #include <stdio.h>
8
9 #ifndef REGTEST
10
11 void clearerr( struct _PDCLIB_file_t * stream )
12 {
13     stream->status &= ~( _PDCLIB_ERRORFLAG | _PDCLIB_EOFFLAG );
14 }
15
16 #endif
17
18 #ifdef TEST
19
20 #include "_PDCLIB_test.h"
21
22 int main( void )
23 {
24     FILE * fh;
25     TESTCASE( ( fh = tmpfile() ) != NULL );
26     /* Flags should be clear */
27     TESTCASE( ! ferror( fh ) );
28     TESTCASE( ! feof( fh ) );
29     /* Reading from empty stream - should provoke EOF */
30     rewind( fh );
31     TESTCASE( fgetc( fh ) == EOF );
32     TESTCASE( ! ferror( fh ) );
33     TESTCASE( feof( fh ) );
34     /* clearerr() should clear flags */
35     clearerr( fh );
36     TESTCASE( ! ferror( fh ) );
37     TESTCASE( ! feof( fh ) );
38     /* reopen() the file write-only */
39     TESTCASE( ( fh = freopen( NULL, "w", fh ) ) != NULL );
40     /* Reading from write-only stream - should provoke error */
41     TESTCASE( fgetc( fh ) == EOF );
42     TESTCASE( ferror( fh ) );
43     TESTCASE( ! feof( fh ) );
44     /* clearerr() should clear flags */
45     clearerr( fh );
46     TESTCASE( ! ferror( fh ) );
47     TESTCASE( ! feof( fh ) );
48     TESTCASE( fclose( fh ) == 0 );
49     return TEST_RESULTS;
50 }
51
52 #endif