1 // RUN: %clang_builtins %s %librt -o %t && %run %t
2 // REQUIRES: librt_has_trunctfdf2
3 
4 #include "int_lib.h"
5 #include <stdio.h>
6 
7 #if __LDBL_MANT_DIG__ == 113
8 
9 #include "fp_test.h"
10 
11 COMPILER_RT_ABI double __trunctfdf2(long double a);
12 
test__trunctfdf2(long double a,uint64_t expected)13 int test__trunctfdf2(long double a, uint64_t expected)
14 {
15     double x = __trunctfdf2(a);
16     int ret = compareResultD(x, expected);
17 
18     if (ret)
19     {
20         printf("error in test__trunctfdf2(%.20Lf) = %lf, "
21                "expected %lf\n", a, x, fromRep64(expected));
22     }
23     return ret;
24 }
25 
26 char assumption_1[sizeof(long double) * CHAR_BIT == 128] = {0};
27 
28 #endif
29 
main()30 int main()
31 {
32 #if __LDBL_MANT_DIG__ == 113
33     // qNaN
34     if (test__trunctfdf2(makeQNaN128(),
35                          UINT64_C(0x7ff8000000000000)))
36         return 1;
37     // NaN
38     if (test__trunctfdf2(makeNaN128(UINT64_C(0x810000000000)),
39                          UINT64_C(0x7ff8100000000000)))
40         return 1;
41     // inf
42     if (test__trunctfdf2(makeInf128(),
43                          UINT64_C(0x7ff0000000000000)))
44         return 1;
45     // zero
46     if (test__trunctfdf2(0.0L, UINT64_C(0x0)))
47         return 1;
48 
49     if (test__trunctfdf2(0x1.af23456789bbaaab347645365cdep+5L,
50                          UINT64_C(0x404af23456789bbb)))
51         return 1;
52     if (test__trunctfdf2(0x1.dedafcff354b6ae9758763545432p-9L,
53                          UINT64_C(0x3f6dedafcff354b7)))
54         return 1;
55     if (test__trunctfdf2(0x1.2f34dd5f437e849b4baab754cdefp+4534L,
56                          UINT64_C(0x7ff0000000000000)))
57         return 1;
58     if (test__trunctfdf2(0x1.edcbff8ad76ab5bf46463233214fp-435L,
59                          UINT64_C(0x24cedcbff8ad76ab)))
60         return 1;
61 
62 #else
63     printf("skipped\n");
64 
65 #endif
66     return 0;
67 }
68