]> pd.if.org Git - pdclib.old/blob - functions/stdlib/labs.c
Fix for #42 - free( NULL ) must not fail.
[pdclib.old] / functions / stdlib / labs.c
1 /* $Id$ */
2
3 /* labs( long int )
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 <stdlib.h>
10
11 #ifndef REGTEST
12
13 long int labs( long int j )
14 {
15     return ( j >= 0 ) ? j : -j;
16 }
17
18 #endif
19
20 #ifdef TEST
21 #include <_PDCLIB_test.h>
22 #include <limits.h>
23
24 int main( void )
25 {
26     TESTCASE( labs( 0 ) == 0 );
27     TESTCASE( labs( LONG_MAX ) == LONG_MAX );
28     TESTCASE( labs( LONG_MIN + 1 ) == -( LONG_MIN + 1 ) );
29     return TEST_RESULTS;
30 }
31
32 #endif