/* 
   lseek.
   
   See COPYLEFT.JRD.
*/
#include <osbind.h>
#include <errno.h>

long lseek(fd, offset, mode)
int fd;
long offset;
int mode; 
{
  int result = Fseek(offset, fd, mode);
  if (result < 0)
	errno = result;
  return(result);
}