test/builtins/Unit/fixunssfti_test.c

   1 // RUN: %clang_builtins %s %librt -o %t && %run %t
   2 // REQUIRES: int128
   3 //===-- fixunssfti_test.c - Test __fixunssfti -----------------------------===//
   4 //
   5 //                     The LLVM Compiler Infrastructure
   6 //
   7 // This file is dual licensed under the MIT and the University of Illinois Open
   8 // Source Licenses. See LICENSE.TXT for details.
   9 //
  10 //===----------------------------------------------------------------------===//
  11 //
  12 // This file tests __fixunssfti for the compiler_rt library.
  13 //
  14 //===----------------------------------------------------------------------===//
  15
  16 #include "int_lib.h"
  17 #include <stdio.h>
  18
  19 #ifdef CRT_HAS_128BIT
  20
  21 // Returns: convert a to a unsigned long long, rounding toward zero.
  22 //          Negative values all become zero.
  23
  24 // Assumption: float is a IEEE 32 bit floating point type
  25 //             tu_int is a 64 bit integral type
  26 //             value in float is representable in tu_int or is negative
  27 //                 (no range checking performed)
  28
  29 // seee eeee emmm mmmm mmmm mmmm mmmm mmmm
  30
  31 COMPILER_RT_ABI tu_int __fixunssfti(float a);
  32
  33 int test__fixunssfti(float a, tu_int expected)
  34 {
  35     tu_int x = __fixunssfti(a);
  36     if (x != expected)
  37     {
  38         utwords xt;
  39         xt.all = x;
  40         utwords expectedt;
  41         expectedt.all = expected;
  42         printf("error in __fixunssfti(%A) = 0x%.16llX%.16llX, expected 0x%.16llX%.16llX\n",
  43                a, xt.s.high, xt.s.low, expectedt.s.high, expectedt.s.low);
  44     }
  45     return x != expected;
  46 }
  47
  48 char assumption_1[sizeof(tu_int) == 2*sizeof(di_int)] = {0};
  49 char assumption_2[sizeof(su_int)*CHAR_BIT == 32] = {0};
  50 char assumption_3[sizeof(float)*CHAR_BIT == 32] = {0};
  51
  52 #endif
  53
  54 int main()
  55 {
  56 #ifdef CRT_HAS_128BIT
  57     if (test__fixunssfti(0.0F, 0))
  58         return 1;
  59
  60     if (test__fixunssfti(0.5F, 0))
  61         return 1;
  62     if (test__fixunssfti(0.99F, 0))
  63         return 1;
  64     if (test__fixunssfti(1.0F, 1))
  65         return 1;
  66     if (test__fixunssfti(1.5F, 1))
  67         return 1;
  68     if (test__fixunssfti(1.99F, 1))
  69         return 1;
  70     if (test__fixunssfti(2.0F, 2))
  71         return 1;
  72     if (test__fixunssfti(2.01F, 2))
  73         return 1;
  74     if (test__fixunssfti(-0.5F, 0))
  75         return 1;
  76     if (test__fixunssfti(-0.99F, 0))
  77         return 1;
  78 #if !TARGET_LIBGCC
  79     if (test__fixunssfti(-1.0F, 0))  // libgcc ignores "returns 0 for negative input" spec
  80         return 1;
  81     if (test__fixunssfti(-1.5F, 0))
  82         return 1;
  83     if (test__fixunssfti(-1.99F, 0))
  84         return 1;
  85     if (test__fixunssfti(-2.0F, 0))
  86         return 1;
  87     if (test__fixunssfti(-2.01F, 0))
  88         return 1;
  89 #endif
  90
  91     if (test__fixunssfti(0x1.FFFFFEp+63F, 0xFFFFFF0000000000ULL))
  92         return 1;
  93     if (test__fixunssfti(0x1.000000p+63F, 0x8000000000000000ULL))
  94         return 1;
  95     if (test__fixunssfti(0x1.FFFFFEp+62F, 0x7FFFFF8000000000LL))
  96         return 1;
  97     if (test__fixunssfti(0x1.FFFFFCp+62F, 0x7FFFFF0000000000LL))
  98         return 1;
  99
 100     if (test__fixunssfti(0x1.FFFFFEp+127F, make_ti(0xFFFFFF0000000000ULL, 0)))
 101         return 1;
 102     if (test__fixunssfti(0x1.000000p+127F, make_ti(0x8000000000000000ULL, 0)))
 103         return 1;
 104     if (test__fixunssfti(0x1.FFFFFEp+126F, make_ti(0x7FFFFF8000000000LL, 0)))
 105         return 1;
 106     if (test__fixunssfti(0x1.FFFFFCp+126F, make_ti(0x7FFFFF0000000000LL, 0)))
 107         return 1;
 108
 109 #if !TARGET_LIBGCC
 110     if (test__fixunssfti(-0x1.FFFFFEp+62F, 0x0000000000000000LL))
 111         return 1;
 112     if (test__fixunssfti(-0x1.FFFFFCp+62F, 0x0000000000000000LL))
 113         return 1;
 114     if (test__fixunssfti(-0x1.FFFFFEp+126F, 0x0000000000000000LL))
 115         return 1;
 116     if (test__fixunssfti(-0x1.FFFFFCp+126F, 0x0000000000000000LL))
 117         return 1;
 118 #endif
 119
 120 #endif
 121    return 0;
 122 }