1//===-- fixunssfsi_test.c - Test __fixunssfsi -----------------------------===//
2//
3//                     The LLVM Compiler Infrastructure
4//
5// This file is dual licensed under the MIT and the University of Illinois Open
6// Source Licenses. See LICENSE.TXT for details.
7//
8//===----------------------------------------------------------------------===//
9//
10// This file tests __fixunssfsi for the compiler_rt library.
11//
12//===----------------------------------------------------------------------===//
13
14#include "int_lib.h"
15#include <stdio.h>
16
17// Returns: convert a to a unsigned int, rounding toward zero.
18//          Negative values all become zero.
19
20// Assumption: float is a IEEE 32 bit floating point type
21//             su_int is a 32 bit integral type
22//             value in float is representable in su_int or is negative
23//                 (no range checking performed)
24
25// seee eeee emmm mmmm mmmm mmmm mmmm mmmm
26
27COMPILER_RT_ABI su_int __fixunssfsi(float a);
28
29int test__fixunssfsi(float a, su_int expected)
30{
31    su_int x = __fixunssfsi(a);
32    if (x != expected)
33        printf("error in __fixunssfsi(%A) = %X, expected %X\n", a, x, expected);
34    return x != expected;
35}
36
37char assumption_2[sizeof(su_int)*CHAR_BIT == 32] = {0};
38char assumption_3[sizeof(float)*CHAR_BIT == 32] = {0};
39
40int main()
41{
42    if (test__fixunssfsi(0.0F, 0))
43        return 1;
44
45    if (test__fixunssfsi(0.5F, 0))
46        return 1;
47    if (test__fixunssfsi(0.99F, 0))
48        return 1;
49    if (test__fixunssfsi(1.0F, 1))
50        return 1;
51    if (test__fixunssfsi(1.5F, 1))
52        return 1;
53    if (test__fixunssfsi(1.99F, 1))
54        return 1;
55    if (test__fixunssfsi(2.0F, 2))
56        return 1;
57    if (test__fixunssfsi(2.01F, 2))
58        return 1;
59    if (test__fixunssfsi(-0.5F, 0))
60        return 1;
61    if (test__fixunssfsi(-0.99F, 0))
62        return 1;
63#if !TARGET_LIBGCC
64    if (test__fixunssfsi(-1.0F, 0))  // libgcc ignores "returns 0 for negative input" spec
65        return 1;
66    if (test__fixunssfsi(-1.5F, 0))
67        return 1;
68    if (test__fixunssfsi(-1.99F, 0))
69        return 1;
70    if (test__fixunssfsi(-2.0F, 0))
71        return 1;
72    if (test__fixunssfsi(-2.01F, 0))
73        return 1;
74#endif
75
76    if (test__fixunssfsi(0x1.000000p+31F, 0x80000000))
77        return 1;
78    if (test__fixunssfsi(0x1.000000p+32F, 0xFFFFFFFF))
79        return 1;
80    if (test__fixunssfsi(0x1.FFFFFEp+31F, 0xFFFFFF00))
81        return 1;
82    if (test__fixunssfsi(0x1.FFFFFEp+30F, 0x7FFFFF80))
83        return 1;
84    if (test__fixunssfsi(0x1.FFFFFCp+30F, 0x7FFFFF00))
85        return 1;
86
87#if !TARGET_LIBGCC
88    if (test__fixunssfsi(-0x1.FFFFFEp+30F, 0))
89        return 1;
90    if (test__fixunssfsi(-0x1.FFFFFCp+30F, 0))
91        return 1;
92#endif
93
94   return 0;
95}
96