1//===-------------- trunctfdf2_test.c - Test __trunctfdf2 -----------------===//
2//
3//                     The LLVM Compiler Infrastructure
4//
5// This file is dual licensed under the MIT and the University of Illinois Open
6// Source Licenses. See LICENSE.TXT for details.
7//
8//===----------------------------------------------------------------------===//
9//
10// This file tests __trunctfdf2 for the compiler_rt library.
11//
12//===----------------------------------------------------------------------===//
13
14#include "int_lib.h"
15#include <stdio.h>
16
17#if __LDBL_MANT_DIG__ == 113
18
19#include "fp_test.h"
20
21COMPILER_RT_ABI double __trunctfdf2(long double a);
22
23int test__trunctfdf2(long double a, uint64_t expected)
24{
25    double x = __trunctfdf2(a);
26    int ret = compareResultD(x, expected);
27
28    if (ret)
29    {
30        printf("error in test__trunctfdf2(%.20Lf) = %lf, "
31               "expected %lf\n", a, x, fromRep64(expected));
32    }
33    return ret;
34}
35
36char assumption_1[sizeof(long double) * CHAR_BIT == 128] = {0};
37
38#endif
39
40int main()
41{
42#if __LDBL_MANT_DIG__ == 113
43    // qNaN
44    if (test__trunctfdf2(makeQNaN128(),
45                         UINT64_C(0x7ff8000000000000)))
46        return 1;
47    // NaN
48    if (test__trunctfdf2(makeNaN128(UINT64_C(0x810000000000)),
49                         UINT64_C(0x7ff8100000000000)))
50        return 1;
51    // inf
52    if (test__trunctfdf2(makeInf128(),
53                         UINT64_C(0x7ff0000000000000)))
54        return 1;
55    // zero
56    if (test__trunctfdf2(0.0L, UINT64_C(0x0)))
57        return 1;
58
59    if (test__trunctfdf2(0x1.af23456789bbaaab347645365cdep+5L,
60                         UINT64_C(0x404af23456789bbb)))
61        return 1;
62    if (test__trunctfdf2(0x1.dedafcff354b6ae9758763545432p-9L,
63                         UINT64_C(0x3f6dedafcff354b7)))
64        return 1;
65    if (test__trunctfdf2(0x1.2f34dd5f437e849b4baab754cdefp+4534L,
66                         UINT64_C(0x7ff0000000000000)))
67        return 1;
68    if (test__trunctfdf2(0x1.edcbff8ad76ab5bf46463233214fp-435L,
69                         UINT64_C(0x24cedcbff8ad76ab)))
70        return 1;
71
72#else
73    printf("skipped\n");
74
75#endif
76    return 0;
77}
78