Updated to fedora-glibc-20041110T0839
[glibc.git] / sysdeps / mach / hurd / ftruncate.c
blob404459e6daf61af8bf10904564be9d900110d5f7
1 /* Copyright (C) 1991, 92, 93, 94, 95, 97, 98 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
4 The GNU C Library is free software; you can redistribute it and/or
5 modify it under the terms of the GNU Lesser General Public
6 License as published by the Free Software Foundation; either
7 version 2.1 of the License, or (at your option) any later version.
9 The GNU C Library is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
12 Lesser General Public License for more details.
14 You should have received a copy of the GNU Lesser General Public
15 License along with the GNU C Library; if not, write to the Free
16 Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
17 02111-1307 USA. */
19 #include <errno.h>
20 #include <sys/types.h>
21 #include <unistd.h>
22 #include <hurd.h>
23 #include <hurd/fd.h>
25 /* Truncate the file FD refers to to LENGTH bytes. */
26 int
27 __ftruncate (fd, length)
28 int fd;
29 __off_t length;
31 error_t err;
32 if (err = HURD_DPORT_USE (fd, __file_set_size (port, length)))
33 return __hurd_dfail (fd, err);
34 return 0;
37 weak_alias (__ftruncate, ftruncate)