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

   1 // RUN: %clang_builtins %s %librt -o %t && %run %t
   2 // REQUIRES: librt_has_fixunssfdi
   3 //===-- fixunssfdi_test.c - Test __fixunssfdi -----------------------------===//
   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 __fixunssfdi for the compiler_rt library.
  12 //
  13 //===----------------------------------------------------------------------===//
  14
  15 #include "int_lib.h"
  16 #include <stdio.h>
  17
  18 // Returns: convert a to a unsigned long long, rounding toward zero.
  19 //          Negative values all become zero.
  20
  21 // Assumption: float is a IEEE 32 bit floating point type
  22 //             du_int is a 64 bit integral type
  23 //             value in float is representable in du_int or is negative
  24 //                 (no range checking performed)
  25
  26 // seee eeee emmm mmmm mmmm mmmm mmmm mmmm
  27
  28 COMPILER_RT_ABI du_int __fixunssfdi(float a);
  29
  30 int test__fixunssfdi(float a, du_int expected)
  31 {
  32     du_int x = __fixunssfdi(a);
  33     if (x != expected)
  34         printf("error in __fixunssfdi(%A) = %llX, expected %llX\n",
  35                a, x, expected);
  36     return x != expected;
  37 }
  38
  39 char assumption_1[sizeof(du_int) == 2*sizeof(si_int)] = {0};
  40 char assumption_2[sizeof(su_int)*CHAR_BIT == 32] = {0};
  41 char assumption_3[sizeof(float)*CHAR_BIT == 32] = {0};
  42
  43 int main()
  44 {
  45     if (test__fixunssfdi(0.0F, 0))
  46         return 1;
  47
  48     if (test__fixunssfdi(0.5F, 0))
  49         return 1;
  50     if (test__fixunssfdi(0.99F, 0))
  51         return 1;
  52     if (test__fixunssfdi(1.0F, 1))
  53         return 1;
  54     if (test__fixunssfdi(1.5F, 1))
  55         return 1;
  56     if (test__fixunssfdi(1.99F, 1))
  57         return 1;
  58     if (test__fixunssfdi(2.0F, 2))
  59         return 1;
  60     if (test__fixunssfdi(2.01F, 2))
  61         return 1;
  62     if (test__fixunssfdi(-0.5F, 0))
  63         return 1;
  64     if (test__fixunssfdi(-0.99F, 0))
  65         return 1;
  66 #if !TARGET_LIBGCC
  67     if (test__fixunssfdi(-1.0F, 0))  // libgcc ignores "returns 0 for negative input" spec
  68         return 1;
  69     if (test__fixunssfdi(-1.5F, 0))
  70         return 1;
  71     if (test__fixunssfdi(-1.99F, 0))
  72         return 1;
  73     if (test__fixunssfdi(-2.0F, 0))
  74         return 1;
  75     if (test__fixunssfdi(-2.01F, 0))
  76         return 1;
  77 #endif
  78
  79     if (test__fixunssfdi(0x1.FFFFFEp+63F, 0xFFFFFF0000000000LL))
  80         return 1;
  81     if (test__fixunssfdi(0x1.000000p+63F, 0x8000000000000000LL))
  82         return 1;
  83     if (test__fixunssfdi(0x1.FFFFFEp+62F, 0x7FFFFF8000000000LL))
  84         return 1;
  85     if (test__fixunssfdi(0x1.FFFFFCp+62F, 0x7FFFFF0000000000LL))
  86         return 1;
  87
  88 #if !TARGET_LIBGCC
  89     if (test__fixunssfdi(-0x1.FFFFFEp+62F, 0x0000000000000000LL))
  90         return 1;
  91     if (test__fixunssfdi(-0x1.FFFFFCp+62F, 0x0000000000000000LL))
  92         return 1;
  93 #endif
  94
  95    return 0;
  96 }