1
0
mirror of https://github.com/cc65/cc65.git synced 2024-11-05 08:05:51 +00:00
cc65/libsrc/common/fseek.c
cuz 6966ccda7e Fixed the return code of fgetpos and ftell.
Made lots of functions __fastcall__.


git-svn-id: svn://svn.cc65.org/cc65/trunk@2615 b7a2c559-68d2-44c3-8de9-860c34a00d81
2003-11-06 18:04:07 +00:00

37 lines
664 B
C

/*
* fseek.c
*
* Christian Groessler, 07-Aug-2000
*/
#include <stdio.h>
#include <errno.h>
#include <unistd.h>
#include "_file.h"
/*****************************************************************************/
/* Code */
/*****************************************************************************/
int __fastcall__ fseek (FILE* f, long offset, int whence)
{
long res;
/* Is the file open? */
if ((f->f_flags & _FOPEN) == 0) {
_errno = EINVAL; /* File not open */
return -1;
}
res = lseek(f->f_fd, offset, whence);
if (res == -1L) return -1;
return 0;
}