X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=functions%2Fstdio%2Fclearerr.c;h=ca22b0332b72b3f8f84bf3c490e2cd520e068a43;hb=3ffa88d3e16e7564ff81bf3650b5afa113caac97;hp=6d80c8aeb381639c62b9fbf0a4194ff68b083bc7;hpb=13ee02fa27a739d9d602f801126eadcfbfeab8a8;p=pdclib diff --git a/functions/stdio/clearerr.c b/functions/stdio/clearerr.c index 6d80c8a..ca22b03 100644 --- a/functions/stdio/clearerr.c +++ b/functions/stdio/clearerr.c @@ -1,5 +1,3 @@ -/* $Id$ */ - /* clearerr( FILE * ) This file is part of the Public Domain C Library (PDCLib). @@ -18,12 +16,37 @@ void clearerr( struct _PDCLIB_file_t * stream ) #endif #ifdef TEST -#include <_PDCLIB_test.h> +#include "_PDCLIB_test.h" int main( void ) { - TESTCASE( NO_TESTDRIVER ); + FILE * fh; + TESTCASE( ( fh = tmpfile() ) != NULL ); + /* Flags should be clear */ + TESTCASE( ! ferror( fh ) ); + TESTCASE( ! feof( fh ) ); + /* Reading from empty stream - should provoke EOF */ + rewind( fh ); + TESTCASE( fgetc( fh ) == EOF ); + TESTCASE( ! ferror( fh ) ); + TESTCASE( feof( fh ) ); + /* clearerr() should clear flags */ + clearerr( fh ); + TESTCASE( ! ferror( fh ) ); + TESTCASE( ! feof( fh ) ); + /* reopen() the file write-only */ + TESTCASE( ( fh = freopen( NULL, "w", fh ) ) != NULL ); + /* Reading from write-only stream - should provoke error */ + TESTCASE( fgetc( fh ) == EOF ); + TESTCASE( ferror( fh ) ); + TESTCASE( ! feof( fh ) ); + /* clearerr() should clear flags */ + clearerr( fh ); + TESTCASE( ! ferror( fh ) ); + TESTCASE( ! feof( fh ) ); + TESTCASE( fclose( fh ) == 0 ); return TEST_RESULTS; } #endif +