diff options
Diffstat (limited to 'gnulib/tests/test-trunc1.c')
m--------- | gnulib | 0 | ||||
-rw-r--r-- | gnulib/tests/test-trunc1.c | 67 |
2 files changed, 67 insertions, 0 deletions
diff --git a/gnulib b/gnulib deleted file mode 160000 -Subproject 4fc10daa05477586fea99b6b3ca02a87d1102fa diff --git a/gnulib/tests/test-trunc1.c b/gnulib/tests/test-trunc1.c new file mode 100644 index 00000000..65b027af --- /dev/null +++ b/gnulib/tests/test-trunc1.c @@ -0,0 +1,67 @@ +/* Test of rounding towards zero. + Copyright (C) 2007-2010 Free Software Foundation, Inc. + + 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/>. */ + +/* Written by Bruno Haible <bruno@clisp.org>, 2007. */ + +#include <config.h> + +#include <math.h> + +#include "signature.h" +SIGNATURE_CHECK (trunc, double, (double)); + +#include "isnand-nolibm.h" +#include "nan.h" +#include "macros.h" + +/* HP cc on HP-UX 10.20 has a bug with the constant expression -0.0. + So we use -zero instead. */ +double zero = 0.0; + +int +main () +{ + /* Zero. */ + ASSERT (trunc (0.0) == 0.0); + ASSERT (trunc (-zero) == 0.0); + /* Positive numbers. */ + ASSERT (trunc (0.3) == 0.0); + ASSERT (trunc (0.7) == 0.0); + ASSERT (trunc (1.0) == 1.0); + ASSERT (trunc (1.5) == 1.0); + ASSERT (trunc (1.999) == 1.0); + ASSERT (trunc (2.0) == 2.0); + ASSERT (trunc (65535.999) == 65535.0); + ASSERT (trunc (65536.0) == 65536.0); + ASSERT (trunc (2.341e31) == 2.341e31); + /* Negative numbers. */ + ASSERT (trunc (-0.3) == 0.0); + ASSERT (trunc (-0.7) == 0.0); + ASSERT (trunc (-1.0) == -1.0); + ASSERT (trunc (-1.5) == -1.0); + ASSERT (trunc (-1.999) == -1.0); + ASSERT (trunc (-2.0) == -2.0); + ASSERT (trunc (-65535.999) == -65535.0); + ASSERT (trunc (-65536.0) == -65536.0); + ASSERT (trunc (-2.341e31) == -2.341e31); + /* Infinite numbers. */ + ASSERT (trunc (1.0 / 0.0) == 1.0 / 0.0); + ASSERT (trunc (-1.0 / 0.0) == -1.0 / 0.0); + /* NaNs. */ + ASSERT (isnand (trunc (NaNd ()))); + + return 0; +} |