_PDCLIB_close( stream->handle );
if ( previous != NULL )
{
- previous->next = current->next;
+ previous->next = stream->next;
}
else
{
- _PDCLIB_filelist = current->next;
+ _PDCLIB_filelist = stream->next;
}
+ free( stream );
return 0;
}
previous = current;
int main( void )
{
#ifndef REGTEST
- /* FIXME: This is basically fopen() checking. Flushing and buffer-freeing is not checked. */
struct _PDCLIB_file_t * file1;
struct _PDCLIB_file_t * file2;
TESTCASE( _PDCLIB_filelist == NULL );
TESTCASE( fclose( file1 ) == 0 );
TESTCASE( _PDCLIB_filelist == file2 );
TESTCASE( fclose( file2 ) == 0 );
- TESTCASE( _PDCLIB_filelist == NULL ); /* FIXME: fails */
+ TESTCASE( _PDCLIB_filelist == NULL );
system( "rm testfile1 testfile2" );
#else
puts( " NOTEST fclose() test driver is PDCLib-specific." );