]>
git.ipfire.org Git - thirdparty/glibc.git/blob - sysdeps/ieee754/ldbl-128ibm/test-totalorderl-ldbl-128ibm.c
1 /* Test totalorderl for ldbl-128ibm.
2 Copyright (C) 2016 Free Software Foundation, Inc.
3 This file is part of the GNU C Library.
5 The GNU C Library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
10 The GNU C Library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 Lesser General Public License for more details.
15 You should have received a copy of the GNU Lesser General Public
16 License along with the GNU C Library; if not, see
17 <http://www.gnu.org/licenses/>. */
20 #include <math_private.h>
29 static const struct test tests
[] =
31 { __builtin_nan (""), 1, __builtin_nans ("") },
32 { -__builtin_nan (""), 1, __builtin_nans ("") },
33 { __builtin_nans (""), 1, __builtin_nan ("") },
34 { -__builtin_nans (""), 1, __builtin_nan ("") },
35 { __builtin_inf (), 0.0, -0.0 },
36 { -__builtin_inf (), 0.0, -0.0 },
45 for (size_t i
= 0; i
< sizeof (tests
) / sizeof (tests
[0]); i
++)
47 long double ldx
= ldbl_pack (tests
[i
].hi
, tests
[i
].lo1
);
48 long double ldy
= ldbl_pack (tests
[i
].hi
, tests
[i
].lo2
);
49 bool to1
= totalorderl (ldx
, ldy
);
50 bool to2
= totalorderl (ldy
, ldx
);
52 printf ("PASS: test %zu\n", i
);
55 printf ("FAIL: test %zu\n", i
);
63 #define TEST_FUNCTION do_test ()
64 #include "../test-skeleton.c"