Mercurial > gnulib

comparison tests/test-truncf1.c @ 29987:7bf583f1e789

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Work around bug of HP-UX 10.20 cc with -0.0 literal.
author Bruno Haible <bruno@clisp.org>
date Fri, 01 Aug 2008 11:30:27 +0200
parents e4b084d57f9e
children e8d2c6fc33ad
comparison
equal deleted inserted replaced
29986:ff6a63286245 29987:7bf583f1e789
36 abort (); \ 36 abort (); \
37 } \ 37 } \
38 } \ 38 } \
39 while (0) 39 while (0)
40 40
41 /* HP cc on HP-UX 10.20 has a bug with the constant expression -0.0f.
42 So we use -zero instead. */
43 float zero = 0.0f;
44
41 int 45 int
42 main () 46 main ()
43 { 47 {
44 /* Zero. */ 48 /* Zero. */
45 ASSERT (truncf (0.0f) == 0.0f); 49 ASSERT (truncf (0.0f) == 0.0f);
46 ASSERT (truncf (-0.0f) == 0.0f); 50 ASSERT (truncf (-zero) == 0.0f);
47 /* Positive numbers. */ 51 /* Positive numbers. */
48 ASSERT (truncf (0.3f) == 0.0f); 52 ASSERT (truncf (0.3f) == 0.0f);
49 ASSERT (truncf (0.7f) == 0.0f); 53 ASSERT (truncf (0.7f) == 0.0f);
50 ASSERT (truncf (1.0f) == 1.0f); 54 ASSERT (truncf (1.0f) == 1.0f);
51 ASSERT (truncf (1.5f) == 1.0f); 55 ASSERT (truncf (1.5f) == 1.0f);