compiler-rt/test/builtins/Unit/trunctfdf2_test.c

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