1//===--------------- trunctfsf2_test.c - Test __trunctfsf2 ----------------===//
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 __trunctfsf2 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 float __trunctfsf2(long double a);
22
23int test__trunctfsf2(long double a, uint32_t expected)
24{
25    float x = __trunctfsf2(a);
26    int ret = compareResultF(x, expected);
27
28    if (ret){
29        printf("error in test__trunctfsf2(%.20Lf) = %f, "
30               "expected %f\n", a, x, fromRep32(expected));
31    }
32    return ret;
33}
34
35char assumption_1[sizeof(long double) * CHAR_BIT == 128] = {0};
36
37#endif
38
39int main()
40{
41#if __LDBL_MANT_DIG__ == 113
42    // qNaN
43    if (test__trunctfsf2(makeQNaN128(),
44                         UINT32_C(0x7fc00000)))
45        return 1;
46    // NaN
47    if (test__trunctfsf2(makeNaN128(UINT64_C(0x810000000000)),
48                         UINT32_C(0x7fc08000)))
49        return 1;
50    // inf
51    if (test__trunctfsf2(makeInf128(),
52                         UINT32_C(0x7f800000)))
53        return 1;
54    // zero
55    if (test__trunctfsf2(0.0L, UINT32_C(0x0)))
56        return 1;
57
58    if (test__trunctfsf2(0x1.23a2abb4a2ddee355f36789abcdep+5L,
59                         UINT32_C(0x4211d156)))
60        return 1;
61    if (test__trunctfsf2(0x1.e3d3c45bd3abfd98b76a54cc321fp-9L,
62                         UINT32_C(0x3b71e9e2)))
63        return 1;
64    if (test__trunctfsf2(0x1.234eebb5faa678f4488693abcdefp+4534L,
65                         UINT32_C(0x7f800000)))
66        return 1;
67    if (test__trunctfsf2(0x1.edcba9bb8c76a5a43dd21f334634p-435L,
68                         UINT32_C(0x0)))
69        return 1;
70
71#else
72    printf("skipped\n");
73
74#endif
75    return 0;
76}
77