]> pd.if.org Git - pdclib.old/blob - functions/stdio/rename.c
Added close().
[pdclib.old] / functions / stdio / rename.c
1 /* $Id$ */
2
3 /* rename( const char *, const char * )
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 #include <stdio.h>
10
11 #ifndef REGTEST
12 #include <_PDCLIB_glue.h>
13
14 int rename( const char * old, const char * new )
15 {
16     /* TODO: Search open file list, flush and close file */
17     return _PDCLIB_rename( old, new );
18 }
19
20 #endif
21
22 #ifdef TEST
23 #include <_PDCLIB_test.h>
24
25 int main( void )
26 {
27 #ifndef REGTEST
28     TESTCASE( NO_TESTDRIVER );
29 #else
30     puts( " NOTEST rename() test driver is PDCLib-specific." );
31 #endif
32     return TEST_RESULTS;
33 }
34
35 #endif