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

   1 // RUN: %clang_builtins %s %librt -o %t && %run %t
   2 // REQUIRES: librt_has_fixtfti
   3
   4 #include "int_lib.h"
   5 #include <stdio.h>
   6
   7 #if __LDBL_MANT_DIG__ == 113
   8
   9 #include "fp_test.h"
  10
  11 ti_int __fixtfti(long double a);
  12
  13 int test__fixtfti(long double a, ti_int expected)
  14 {
  15     ti_int x = __fixtfti(a);
  16     int ret = (x != expected);
  17
  18     if (ret)
  19     {
  20         twords xt;
  21         xt.all = x;
  22
  23         twords expectedt;
  24         expectedt.all = expected;
  25
  26         printf("error in test__fixtfti(%.20Lf) = 0x%.16llX%.16llX, "
  27                "expected 0x%.16llX%.16llX\n",
  28                a, xt.s.high, xt.s.low, expectedt.s.high, expectedt.s.low);
  29     }
  30     return ret;
  31 }
  32
  33 char assumption_1[sizeof(long double) * CHAR_BIT == 128] = {0};
  34
  35 #endif
  36
  37 int main()
  38 {
  39 #if __LDBL_MANT_DIG__ == 113
  40     if (test__fixtfti(makeInf128(), make_ti(0x7fffffffffffffffLL,
  41                                             0xffffffffffffffffLL)))
  42         return 1;
  43     if (test__fixtfti(0, make_ti(0x0LL, 0x0LL)))
  44         return 1;
  45     if (test__fixtfti(0x1.23456789abcdefp+5L, make_ti(0x0LL, 0x24LL)))
  46         return 1;
  47     if (test__fixtfti(0x1.23456789abcdefp-3L, make_ti(0x0LL, 0x0LL)))
  48         return 1;
  49     if (test__fixtfti(0x1.23456789abcdef12345678p+20L,
  50                       make_ti(0x0LL, 0x123456LL)))
  51         return 1;
  52     if (test__fixtfti(0x1.23456789abcdef123456789abcdep+112L,
  53                       make_ti(0x123456789abcdLL, 0xef123456789abcdeLL)))
  54         return 1;
  55     if (test__fixtfti(-0x1.23456789abcdef123456789abcdep+112L,
  56                       make_ti(0xFFFEDCBA98765432LL, 0x10EDCBA987654322LL)))
  57         return 1;
  58     if (test__fixtfti(0x1.23456789abcdefp+256L, make_ti(0x7fffffffffffffffLL,
  59                                                         0xffffffffffffffffLL)))
  60         return 1;
  61     if (test__fixtfti(-0x1.23456789abcdefp+20L, make_ti(0xffffffffffffffffLL,
  62                                                         0xffffffffffedcbaaLL)))
  63         return 1;
  64     if (test__fixtfti(-0x1.23456789abcdefp+256L, make_ti(0x8000000000000000LL,
  65                                                          0x0)))
  66         return 1;
  67
  68 #else
  69     printf("skipped\n");
  70
  71 #endif
  72     return 0;
  73 }