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

   1 // RUN: %clang_builtins %s %librt -o %t && %run %t
   2 // REQUIRES: librt_has_divtf3
   3 //===--------------- divtf3_test.c - Test __divtf3 ------------------------===//
   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 __divtf3 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 // Returns: a / b
  23 COMPILER_RT_ABI long double __divtf3(long double a, long double b);
  24
  25 int test__divtf3(long double a, long double b,
  26                  uint64_t expectedHi, uint64_t expectedLo)
  27 {
  28     long double x = __divtf3(a, b);
  29     int ret = compareResultLD(x, expectedHi, expectedLo);
  30
  31     if (ret){
  32         printf("error in test__divtf3(%.20Le, %.20Le) = %.20Le, "
  33                "expected %.20Le\n", a, b, x,
  34                fromRep128(expectedHi, expectedLo));
  35     }
  36     return ret;
  37 }
  38
  39 char assumption_1[sizeof(long double) * CHAR_BIT == 128] = {0};
  40
  41 #endif
  42
  43 int main()
  44 {
  45 #if __LDBL_MANT_DIG__ == 113
  46     // qNaN / any = qNaN
  47     if (test__divtf3(makeQNaN128(),
  48                      0x1.23456789abcdefp+5L,
  49                      UINT64_C(0x7fff800000000000),
  50                      UINT64_C(0x0)))
  51         return 1;
  52     // NaN / any = NaN
  53     if (test__divtf3(makeNaN128(UINT64_C(0x800030000000)),
  54                      0x1.23456789abcdefp+5L,
  55                      UINT64_C(0x7fff800000000000),
  56                      UINT64_C(0x0)))
  57         return 1;
  58     // inf / any = inf
  59     if (test__divtf3(makeInf128(),
  60                      0x1.23456789abcdefp+5L,
  61                      UINT64_C(0x7fff000000000000),
  62                      UINT64_C(0x0)))
  63         return 1;
  64     // any / any
  65     if (test__divtf3(0x1.a23b45362464523375893ab4cdefp+5L,
  66                      0x1.eedcbaba3a94546558237654321fp-1L,
  67                      UINT64_C(0x4004b0b72924d407),
  68                      UINT64_C(0x0717e84356c6eba2)))
  69         return 1;
  70     if (test__divtf3(0x1.a2b34c56d745382f9abf2c3dfeffp-50L,
  71                      0x1.ed2c3ba15935332532287654321fp-9L,
  72                      UINT64_C(0x3fd5b2af3f828c9b),
  73                      UINT64_C(0x40e51f64cde8b1f2)))
  74         return 15;
  75     if (test__divtf3(0x1.2345f6aaaa786555f42432abcdefp+456L,
  76                      0x1.edacbba9874f765463544dd3621fp+6400L,
  77                      UINT64_C(0x28c62e15dc464466),
  78                      UINT64_C(0xb5a07586348557ac)))
  79         return 1;
  80     if (test__divtf3(0x1.2d3456f789ba6322bc665544edefp-234L,
  81                      0x1.eddcdba39f3c8b7a36564354321fp-4455L,
  82                      UINT64_C(0x507b38442b539266),
  83                      UINT64_C(0x22ce0f1d024e1252)))
  84         return 1;
  85     if (test__divtf3(0x1.2345f6b77b7a8953365433abcdefp+234L,
  86                      0x1.edcba987d6bb3aa467754354321fp-4055L,
  87                      UINT64_C(0x50bf2e02f0798d36),
  88                      UINT64_C(0x5e6fcb6b60044078)))
  89         return 1;
  90     if (test__divtf3(6.72420628622418701252535563464350521E-4932L,
  91                      2.L,
  92                      UINT64_C(0x0001000000000000),
  93                      UINT64_C(0)))
  94         return 1;
  95
  96 #else
  97     printf("skipped\n");
  98
  99 #endif
 100     return 0;
 101 }