Mercurial > hg > octave-nkf > gnulib-hg
annotate tests/test-ceil1.c @ 14878:293a9a1292a9
strerror-override: avoid bloating errno module
* modules/errno (Files, configure.ac): Move replacement strings...
* modules/strerror-override: ...to new module.
* modules/strerror (Depends-on): Add strerror-override.
* modules/strerror_r-posix (Depends-on): Likewise.
* MODULES.html.sh: Document new module.
Reported by Bruno Haible.
Signed-off-by: Eric Blake <eblake@redhat.com>
author | Eric Blake <eblake@redhat.com> |
---|---|
date | Mon, 06 Jun 2011 15:11:04 -0600 |
parents | 97fc9a21a8fb |
children | 328819af1c02 |
rev | line source |
---|---|
13975 | 1 /* Test of rounding towards positive infinity. |
14079
97fc9a21a8fb
maint: update almost all copyright ranges to include 2011
Jim Meyering <meyering@redhat.com>
parents:
13975
diff
changeset
|
2 Copyright (C) 2007-2011 Free Software Foundation, Inc. |
13975 | 3 |
4 This program is free software: you can redistribute it and/or modify | |
5 it under the terms of the GNU General Public License as published by | |
6 the Free Software Foundation; either version 3 of the License, or | |
7 (at your option) any later version. | |
8 | |
9 This program is distributed in the hope that it will be useful, | |
10 but WITHOUT ANY WARRANTY; without even the implied warranty of | |
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
12 GNU General Public License for more details. | |
13 | |
14 You should have received a copy of the GNU General Public License | |
15 along with this program. If not, see <http://www.gnu.org/licenses/>. */ | |
16 | |
17 /* Written by Bruno Haible <bruno@clisp.org>, 2007. */ | |
18 | |
19 #include <config.h> | |
20 | |
21 #include <math.h> | |
22 | |
23 #include "signature.h" | |
24 SIGNATURE_CHECK (ceil, double, (double)); | |
25 | |
26 #include <float.h> | |
27 | |
28 #include "isnand-nolibm.h" | |
29 #include "minus-zero.h" | |
30 #include "nan.h" | |
31 #include "macros.h" | |
32 | |
33 int | |
34 main () | |
35 { | |
36 /* Zero. */ | |
37 ASSERT (ceil (0.0) == 0.0); | |
38 ASSERT (ceil (minus_zerod) == 0.0); | |
39 /* Positive numbers. */ | |
40 ASSERT (ceil (0.3) == 1.0); | |
41 ASSERT (ceil (0.7) == 1.0); | |
42 ASSERT (ceil (1.0) == 1.0); | |
43 ASSERT (ceil (1.001) == 2.0); | |
44 ASSERT (ceil (1.5) == 2.0); | |
45 ASSERT (ceil (1.999) == 2.0); | |
46 ASSERT (ceil (2.0) == 2.0); | |
47 ASSERT (ceil (65535.999) == 65536.0); | |
48 ASSERT (ceil (65536.0) == 65536.0); | |
49 ASSERT (ceil (2.341e31) == 2.341e31); | |
50 /* Negative numbers. */ | |
51 ASSERT (ceil (-0.3) == 0.0); | |
52 ASSERT (ceil (-0.7) == 0.0); | |
53 ASSERT (ceil (-1.0) == -1.0); | |
54 ASSERT (ceil (-1.5) == -1.0); | |
55 ASSERT (ceil (-1.999) == -1.0); | |
56 ASSERT (ceil (-2.0) == -2.0); | |
57 ASSERT (ceil (-65535.999) == -65535.0); | |
58 ASSERT (ceil (-65536.0) == -65536.0); | |
59 ASSERT (ceil (-2.341e31) == -2.341e31); | |
60 /* Infinite numbers. */ | |
61 ASSERT (ceil (1.0 / 0.0) == 1.0 / 0.0); | |
62 ASSERT (ceil (-1.0 / 0.0) == -1.0 / 0.0); | |
63 /* NaNs. */ | |
64 ASSERT (isnand (ceil (NaNd ()))); | |
65 | |
66 return 0; | |
67 } |