Files
modules/lib/testutil-closedir.c
Xavier Delaruelle dbea39b5bd ts/lib: test tcl ext lib against a failed closedir call
Add an utility library that supersedes the closedir function from libc.
The closedir function from this added library always returns an error
(-1). It is used for coverage test of the closedir call made withing the
Envmodules_GetFilesInDirectoryObjCmd function of the Tcl extension
library.
2019-08-09 20:50:58 +02:00

29 lines
1.0 KiB
C

/*************************************************************************
*
* TESTUTIL-CLOSEDIR.C, Superseded closedir function for test purpose
* Copyright (C) 2019 Xavier Delaruelle
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*
************************************************************************/
#include <dirent.h>
int closedir(DIR *dirp)
{
return -1;
}
/* vim:set tabstop=3 shiftwidth=3 expandtab autoindent: */