/* $Id$ */
-/* fseek( FILE *, long int, int )
+/* fseek( FILE *, long offset, int )
This file is part of the Public Domain C Library (PDCLib).
Permission is granted to use, modify, and / or redistribute at will.
#ifndef REGTEST
-int fseek( struct _PDCLIB_file_t * stream, long int offset, int whence )
+#include <_PDCLIB_glue.h>
+
+int fseek( struct _PDCLIB_file_t * stream, long offset, int whence )
{
- /* TODO: Implement. */
- return 0;
+ if ( stream->status & _PDCLIB_FWRITE )
+ {
+ if ( _PDCLIB_flushbuffer( stream ) == EOF )
+ {
+ return EOF;
+ }
+ }
+ stream->status &= ~ _PDCLIB_EOFFLAG;
+ if ( stream->status & _PDCLIB_FRW )
+ {
+ stream->status &= ~ ( _PDCLIB_FREAD | _PDCLIB_FWRITE );
+ }
+ return ( _PDCLIB_seek( stream, offset, whence ) == offset ) ? 0 : EOF;
}
#endif
int main( void )
{
- TESTCASE( NO_TESTDRIVER );
+ /* Testing covered by ftell.c */
return TEST_RESULTS;
}
#endif
+