Home | History | Annotate | Download | only in Unit 
      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 
     21 COMPILER_RT_ABI float __trunctfsf2(long double a);
     22 
     23 int 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 
     35 char assumption_1[sizeof(long double) * CHAR_BIT == 128] = {0};
     36 
     37 #endif
     38 
     39 int 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