]> pd.if.org Git - pdclib.old/blob - errno.c
7a690800d45f92c6b492448f1b3238d77427c406
[pdclib.old] / errno.c
1 /* $Id$ */
2
3 /* _PDCLIB_errno
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 <_PDCLIB_int.h>
10
11 #ifndef REGTEST
12
13 int _PDCLIB_errno = 0;
14
15 int * _PDCLIB_errno_func()
16 {
17     return &_PDCLIB_errno;
18 }
19
20 #endif
21
22 #ifdef TEST
23 #include <_PDCLIB_test.h>
24
25 #include <errno.h>
26
27 int main( void )
28 {
29     errno = 0;
30     TESTCASE( errno == 0 );
31     errno = EDOM;
32     TESTCASE( errno == EDOM );
33     errno = ERANGE;
34     TESTCASE( errno == ERANGE );
35     return TEST_RESULTS;
36 }
37
38 #endif
39