1 // SPDX-License-Identifier: GPL-2.0+
4 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
7 * Test for correctness of composite floating-point comparisons.
8 * Written by Paolo Bonzini, 26th May 2004.
9 * This file is originally a part of the GCC testsuite.
18 #if CONFIG_POST & CONFIG_SYS_POST_FPU
22 #define TEST(c) if ((c) != ok) failed++
23 #define ORD(a, b) (!__builtin_isunordered ((a), (b)))
24 #define UNORD(a, b) (__builtin_isunordered ((a), (b)))
25 #define UNEQ(a, b) (__builtin_isunordered ((a), (b)) || ((a) == (b)))
26 #define UNLT(a, b) (__builtin_isunordered ((a), (b)) || ((a) < (b)))
27 #define UNLE(a, b) (__builtin_isunordered ((a), (b)) || ((a) <= (b)))
28 #define UNGT(a, b) (__builtin_isunordered ((a), (b)) || ((a) > (b)))
29 #define UNGE(a, b) (__builtin_isunordered ((a), (b)) || ((a) >= (b)))
30 #define LTGT(a, b) (__builtin_islessgreater ((a), (b)))
36 static void iuneq (float x, float y, int ok)
40 TEST (UNLE (x, y) && UNGE (x,y));
43 static void ieq (float x, float y, int ok)
45 TEST (ORD (x, y) && UNEQ (x, y));
48 static void iltgt (float x, float y, int ok)
50 TEST (!UNEQ (x, y)); /* Not optimizable. */
51 TEST (LTGT (x, y)); /* Same, __builtin_islessgreater does not trap. */
52 TEST (ORD (x, y) && (UNLT (x, y) || UNGT (x,y)));
55 static void ine (float x, float y, int ok)
57 TEST (UNLT (x, y) || UNGT (x, y));
60 static void iunlt (float x, float y, int ok)
63 TEST (UNORD (x, y) || (x < y));
66 static void ilt (float x, float y, int ok)
68 TEST (ORD (x, y) && UNLT (x, y)); /* Not optimized */
69 TEST ((x <= y) && (x != y));
70 TEST ((x <= y) && (y != x));
71 TEST ((x != y) && (x <= y)); /* Not optimized */
72 TEST ((y != x) && (x <= y)); /* Not optimized */
75 static void iunle (float x, float y, int ok)
78 TEST (UNORD (x, y) || (x <= y));
81 static void ile (float x, float y, int ok)
83 TEST (ORD (x, y) && UNLE (x, y)); /* Not optimized */
84 TEST ((x < y) || (x == y));
85 TEST ((y > x) || (x == y));
86 TEST ((x == y) || (x < y)); /* Not optimized */
87 TEST ((y == x) || (x < y)); /* Not optimized */
90 static void iungt (float x, float y, int ok)
93 TEST (UNORD (x, y) || (x > y));
96 static void igt (float x, float y, int ok)
98 TEST (ORD (x, y) && UNGT (x, y)); /* Not optimized */
99 TEST ((x >= y) && (x != y));
100 TEST ((x >= y) && (y != x));
101 TEST ((x != y) && (x >= y)); /* Not optimized */
102 TEST ((y != x) && (x >= y)); /* Not optimized */
105 static void iunge (float x, float y, int ok)
108 TEST (UNORD (x, y) || (x >= y));
111 static void ige (float x, float y, int ok)
113 TEST (ORD (x, y) && UNGE (x, y)); /* Not optimized */
114 TEST ((x > y) || (x == y));
115 TEST ((y < x) || (x == y));
116 TEST ((x == y) || (x > y)); /* Not optimized */
117 TEST ((y == x) || (x > y)); /* Not optimized */
120 int fpu_post_test_math6 (void)
122 pinf = __builtin_inf ();
123 ninf = -__builtin_inf ();
124 NaN = __builtin_nan ("");
126 iuneq (ninf, pinf, 0);
128 iuneq (pinf, ninf, 0);
137 iltgt (ninf, pinf, 1);
139 iltgt (pinf, ninf, 1);
148 iunlt (NaN, ninf, 1);
149 iunlt (pinf, NaN, 1);
150 iunlt (pinf, ninf, 0);
151 iunlt (pinf, pinf, 0);
152 iunlt (ninf, ninf, 0);
161 iunle (NaN, ninf, 1);
162 iunle (pinf, NaN, 1);
163 iunle (pinf, ninf, 0);
164 iunle (pinf, pinf, 1);
165 iunle (ninf, ninf, 1);
174 iungt (NaN, ninf, 1);
175 iungt (pinf, NaN, 1);
176 iungt (pinf, ninf, 1);
177 iungt (pinf, pinf, 0);
178 iungt (ninf, ninf, 0);
187 iunge (NaN, ninf, 1);
188 iunge (pinf, NaN, 1);
189 iunge (ninf, pinf, 0);
190 iunge (pinf, pinf, 1);
191 iunge (ninf, ninf, 1);
201 post_log ("Error in FPU math6 test\n");
207 #endif /* CONFIG_POST & CONFIG_SYS_POST_FPU */