X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=functions%2Fstdio%2Ffwrite.c;h=482cdb818c2fef39ccc3713178da6a9f22b83da5;hb=d6f1494a4f38a212b29a13ee713885058dcf0fe7;hp=3c40186500a88ceac20eed0e02989a2d5ab7d113;hpb=55cf35957bf8dec0a489ba758c02c83303a5eb50;p=pdclib diff --git a/functions/stdio/fwrite.c b/functions/stdio/fwrite.c index 3c40186..482cdb8 100644 --- a/functions/stdio/fwrite.c +++ b/functions/stdio/fwrite.c @@ -1,5 +1,3 @@ -/* $Id$ */ - /* fwrite( const void *, size_t, size_t, FILE * ) This file is part of the Public Domain C Library (PDCLib). @@ -7,10 +5,11 @@ */ #include -#include <_PDCLIB_glue.h> #ifndef REGTEST +#include "_PDCLIB_glue.h" + #include #include @@ -21,18 +20,18 @@ size_t fwrite( const void * _PDCLIB_restrict ptr, size_t size, size_t nmemb, str return 0; } _PDCLIB_size_t offset = 0; - bool lineend = false; + /* TODO: lineend */ + /* bool lineend = false; */ size_t nmemb_i; for ( nmemb_i = 0; nmemb_i < nmemb; ++nmemb_i ) { for ( size_t size_i = 0; size_i < size; ++size_i ) { - /* TODO: Should line-buffered streams be flushed on '\n' or system EOL? */ if ( ( stream->buffer[ stream->bufidx++ ] = ((char*)ptr)[ nmemb_i * size + size_i ] ) == '\n' ) { /* Remember last newline, in case we have to do a partial line-buffered flush */ offset = stream->bufidx; - lineend = true; + /* lineend = true; */ } if ( stream->bufidx == stream->bufsize ) { @@ -41,7 +40,7 @@ size_t fwrite( const void * _PDCLIB_restrict ptr, size_t size, size_t nmemb, str /* Returning number of objects completely buffered */ return nmemb_i; } - lineend = false; + /* lineend = false; */ } } } @@ -83,17 +82,11 @@ size_t fwrite( const void * _PDCLIB_restrict ptr, size_t size, size_t nmemb, str #endif #ifdef TEST -#include <_PDCLIB_test.h> +#include "_PDCLIB_test.h" int main( void ) { - FILE * fh; - remove( testfile ); - TESTCASE( ( fh = fopen( testfile, "w" ) ) != NULL ); - TESTCASE( fwrite( "SUCCESS testing fwrite()\n", 1, 25, fh ) == 25 ); - TESTCASE( fclose( fh ) == 0 ); - /* TODO: Add readback test. */ - TESTCASE( remove( testfile ) == 0 ); + /* Testing covered by fread(). */ return TEST_RESULTS; }