OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [newlib-1.10.0/] [newlib/] [libc/] [sys/] [go32/] [truncate.c] - Diff between revs 1010 and 1765

Go to most recent revision | Only display areas with differences | Details | Blame | View Log

Rev 1010 Rev 1765
/* This is file TRUNCATE.C */
/* This is file TRUNCATE.C */
/*
/*
** Copyright (C) 1991 DJ Delorie
** Copyright (C) 1991 DJ Delorie
**
**
** This file is distributed under the terms listed in the document
** This file is distributed under the terms listed in the document
** "copying.dj".
** "copying.dj".
** A copy of "copying.dj" should accompany this file; if not, a copy
** A copy of "copying.dj" should accompany this file; if not, a copy
** should be available from where this file was obtained.  This file
** should be available from where this file was obtained.  This file
** may not be distributed without a verbatim copy of "copying.dj".
** may not be distributed without a verbatim copy of "copying.dj".
**
**
** This file is distributed WITHOUT ANY WARRANTY; without even the implied
** This file is distributed WITHOUT ANY WARRANTY; without even the implied
** warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
** warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
*/
*/
 
 
#include <fcntl.h>
#include <fcntl.h>
 
 
truncate(const char *fn, unsigned long where)
truncate(const char *fn, unsigned long where)
{
{
  int fd = open(fn, O_WRONLY);
  int fd = open(fn, O_WRONLY);
  if (fd < 0)
  if (fd < 0)
    return -1;
    return -1;
  lseek(fd, where, 0);
  lseek(fd, where, 0);
  write(fd, 0, 0);
  write(fd, 0, 0);
  close(fd);
  close(fd);
}
}
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.