]> pd.if.org Git - pdclib/blob - platform/example/functions/_PDCLIB/close.c
f3475974adb3048ce3021ae2bb9f512344e72dd1
[pdclib] / platform / example / functions / _PDCLIB / close.c
1 /* $Id$ */
2
3 /* _PDCLIB_close( _PDCLIB_fd_t fd )
4
5    This file is part of the Public Domain C Library (PDCLib).
6    Permission is granted to use, modify, and / or redistribute at will.
7 */
8
9 /* This is an example implementation of _PDCLIB_close() fit for use with POSIX
10    kernels.
11 */
12
13 #include <stdio.h>
14
15 #ifndef REGTEST
16 #include <_PDCLIB_glue.h>
17
18 #include <sys/types.h>
19 #include <sys/stat.h>
20 #include <fcntl.h>
21 #include <unistd.h>
22
23 int _PDCLIB_close( int fd )
24 {
25     return close( fd );
26 }
27
28 #endif
29
30 #ifdef TEST
31 #include <_PDCLIB_test.h>
32
33 int main( void )
34 {
35     /* No testdriver; tested in driver for _PDCLIB_open(). */
36     return TEST_RESULTS;
37 }
38
39 #endif