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

   1 // RUN: %clang_builtins %s %librt -o %t && %run %t
   2 // REQUIRES: librt_has_fixunsdfsi
   3 //===-- fixunsdfsi_test.c - Test __fixunsdfsi -----------------------------===//
   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 __fixunsdfsi 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 int, rounding toward zero.
  19 //          Negative values all become zero.
  20
  21 // Assumption: double is a IEEE 64 bit floating point type
  22 //             su_int is a 32 bit integral type
  23 //             value in double is representable in su_int or is negative
  24 //                 (no range checking performed)
  25
  26 // seee eeee eeee mmmm mmmm mmmm mmmm mmmm | mmmm mmmm mmmm mmmm mmmm mmmm mmmm mmmm
  27
  28 COMPILER_RT_ABI su_int __fixunsdfsi(double a);
  29
  30 int test__fixunsdfsi(double a, su_int expected)
  31 {
  32     su_int x = __fixunsdfsi(a);
  33     if (x != expected)
  34         printf("error in __fixunsdfsi(%A) = %X, expected %X\n", a, x, expected);
  35     return x != expected;
  36 }
  37
  38 char assumption_2[sizeof(su_int)*CHAR_BIT == 32] = {0};
  39 char assumption_3[sizeof(double)*CHAR_BIT == 64] = {0};
  40
  41 int main()
  42 {
  43     if (test__fixunsdfsi(0.0, 0))
  44         return 1;
  45
  46     if (test__fixunsdfsi(0.5, 0))
  47         return 1;
  48     if (test__fixunsdfsi(0.99, 0))
  49         return 1;
  50     if (test__fixunsdfsi(1.0, 1))
  51         return 1;
  52     if (test__fixunsdfsi(1.5, 1))
  53         return 1;
  54     if (test__fixunsdfsi(1.99, 1))
  55         return 1;
  56     if (test__fixunsdfsi(2.0, 2))
  57         return 1;
  58     if (test__fixunsdfsi(2.01, 2))
  59         return 1;
  60     if (test__fixunsdfsi(-0.5, 0))
  61         return 1;
  62     if (test__fixunsdfsi(-0.99, 0))
  63         return 1;
  64 #if !TARGET_LIBGCC
  65     if (test__fixunsdfsi(-1.0, 0))  // libgcc ignores "returns 0 for negative input" spec
  66         return 1;
  67     if (test__fixunsdfsi(-1.5, 0))
  68         return 1;
  69     if (test__fixunsdfsi(-1.99, 0))
  70         return 1;
  71     if (test__fixunsdfsi(-2.0, 0))
  72         return 1;
  73     if (test__fixunsdfsi(-2.01, 0))
  74         return 1;
  75 #endif
  76
  77     if (test__fixunsdfsi(0x1.000000p+31, 0x80000000))
  78         return 1;
  79     if (test__fixunsdfsi(0x1.000000p+32, 0xFFFFFFFF))
  80         return 1;
  81     if (test__fixunsdfsi(0x1.FFFFFEp+31, 0xFFFFFF00))
  82         return 1;
  83     if (test__fixunsdfsi(0x1.FFFFFEp+30, 0x7FFFFF80))
  84         return 1;
  85     if (test__fixunsdfsi(0x1.FFFFFCp+30, 0x7FFFFF00))
  86         return 1;
  87
  88 #if !TARGET_LIBGCC
  89     if (test__fixunsdfsi(-0x1.FFFFFEp+30, 0))
  90         return 1;
  91     if (test__fixunsdfsi(-0x1.FFFFFCp+30, 0))
  92         return 1;
  93 #endif
  94
  95     if (test__fixunsdfsi(0x1.FFFFFFFEp+31, 0xFFFFFFFF))
  96         return 1;
  97     if (test__fixunsdfsi(0x1.FFFFFFFC00000p+30, 0x7FFFFFFF))
  98         return 1;
  99     if (test__fixunsdfsi(0x1.FFFFFFF800000p+30, 0x7FFFFFFE))
 100         return 1;
 101
 102    return 0;
 103 }