← Back to branch summary

~pmdj/ubuntu/trusty/qemu/2.9+applesmc+fadtv3

« back to all changes in this revision

Viewing changes to roms/u-boot/post/lib_powerpc/fpu/compare-fp-1.c

  • Committer: Phil Dennis-Jordan
  • Date: 2017-07-21 08:03:43 UTC
  • mfrom: (1.1.1)
  • Revision ID: phil@philjordan.eu-20170721080343-2yr2vdj7713czahv
New upstream release 2.9.0.

Show diffs side-by-side

added added

removed removed

Lines of Context:
roms/u-boot/post/lib_powerpc/fpu/compare-fp-1.c
 
1
/*
 
2
 * Copyright (C) 2007
 
3
 * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
 
4
 *
 
5
 * SPDX-License-Identifier:     GPL-2.0+
 
6
 */
 
7
/*
 
8
 * Test for correctness of composite floating-point comparisons.
 
9
 * Written by Paolo Bonzini, 26th May 2004.
 
10
 * This file is originally a part of the GCC testsuite.
 
11
 */
 
12
 
 
13
#include <common.h>
 
14
 
 
15
#include <post.h>
 
16
 
 
17
GNU_FPOST_ATTR
 
18
 
 
19
#if CONFIG_POST & CONFIG_SYS_POST_FPU
 
20
 
 
21
static int failed;
 
22
 
 
23
#define TEST(c) if ((c) != ok) failed++
 
24
#define ORD(a, b) (!__builtin_isunordered ((a), (b)))
 
25
#define UNORD(a, b) (__builtin_isunordered ((a), (b)))
 
26
#define UNEQ(a, b) (__builtin_isunordered ((a), (b)) || ((a) == (b)))
 
27
#define UNLT(a, b) (__builtin_isunordered ((a), (b)) || ((a) < (b)))
 
28
#define UNLE(a, b) (__builtin_isunordered ((a), (b)) || ((a) <= (b)))
 
29
#define UNGT(a, b) (__builtin_isunordered ((a), (b)) || ((a) > (b)))
 
30
#define UNGE(a, b) (__builtin_isunordered ((a), (b)) || ((a) >= (b)))
 
31
#define LTGT(a, b) (__builtin_islessgreater ((a), (b)))
 
32
 
 
33
static float pinf;
 
34
static float ninf;
 
35
static float NaN;
 
36
 
 
37
static void iuneq (float x, float y, int ok)
 
38
{
 
39
        TEST (UNEQ (x, y));
 
40
        TEST (!LTGT (x, y));
 
41
        TEST (UNLE (x, y) && UNGE (x,y));
 
42
}
 
43
 
 
44
static void ieq (float x, float y, int ok)
 
45
{
 
46
        TEST (ORD (x, y) && UNEQ (x, y));
 
47
}
 
48
 
 
49
static void iltgt (float x, float y, int ok)
 
50
{
 
51
        TEST (!UNEQ (x, y)); /* Not optimizable. */
 
52
        TEST (LTGT (x, y)); /* Same, __builtin_islessgreater does not trap. */
 
53
        TEST (ORD (x, y) && (UNLT (x, y) || UNGT (x,y)));
 
54
}
 
55
 
 
56
static void ine (float x, float y, int ok)
 
57
{
 
58
        TEST (UNLT (x, y) || UNGT (x, y));
 
59
}
 
60
 
 
61
static void iunlt (float x, float y, int ok)
 
62
{
 
63
        TEST (UNLT (x, y));
 
64
        TEST (UNORD (x, y) || (x < y));
 
65
}
 
66
 
 
67
static void ilt (float x, float y, int ok)
 
68
{
 
69
        TEST (ORD (x, y) && UNLT (x, y)); /* Not optimized */
 
70
        TEST ((x <= y) && (x != y));
 
71
        TEST ((x <= y) && (y != x));
 
72
        TEST ((x != y) && (x <= y)); /* Not optimized */
 
73
        TEST ((y != x) && (x <= y)); /* Not optimized */
 
74
}
 
75
 
 
76
static void iunle (float x, float y, int ok)
 
77
{
 
78
        TEST (UNLE (x, y));
 
79
        TEST (UNORD (x, y) || (x <= y));
 
80
}
 
81
 
 
82
static void ile (float x, float y, int ok)
 
83
{
 
84
        TEST (ORD (x, y) && UNLE (x, y)); /* Not optimized */
 
85
        TEST ((x < y) || (x == y));
 
86
        TEST ((y > x) || (x == y));
 
87
        TEST ((x == y) || (x < y)); /* Not optimized */
 
88
        TEST ((y == x) || (x < y)); /* Not optimized */
 
89
}
 
90
 
 
91
static void iungt (float x, float y, int ok)
 
92
{
 
93
        TEST (UNGT (x, y));
 
94
        TEST (UNORD (x, y) || (x > y));
 
95
}
 
96
 
 
97
static void igt (float x, float y, int ok)
 
98
{
 
99
        TEST (ORD (x, y) && UNGT (x, y)); /* Not optimized */
 
100
        TEST ((x >= y) && (x != y));
 
101
        TEST ((x >= y) && (y != x));
 
102
        TEST ((x != y) && (x >= y)); /* Not optimized */
 
103
        TEST ((y != x) && (x >= y)); /* Not optimized */
 
104
}
 
105
 
 
106
static void iunge (float x, float y, int ok)
 
107
{
 
108
        TEST (UNGE (x, y));
 
109
        TEST (UNORD (x, y) || (x >= y));
 
110
}
 
111
 
 
112
static void ige (float x, float y, int ok)
 
113
{
 
114
        TEST (ORD (x, y) && UNGE (x, y)); /* Not optimized */
 
115
        TEST ((x > y) || (x == y));
 
116
        TEST ((y < x) || (x == y));
 
117
        TEST ((x == y) || (x > y)); /* Not optimized */
 
118
        TEST ((y == x) || (x > y)); /* Not optimized */
 
119
}
 
120
 
 
121
int fpu_post_test_math6 (void)
 
122
{
 
123
        pinf = __builtin_inf ();
 
124
        ninf = -__builtin_inf ();
 
125
        NaN = __builtin_nan ("");
 
126
 
 
127
        iuneq (ninf, pinf, 0);
 
128
        iuneq (NaN, NaN, 1);
 
129
        iuneq (pinf, ninf, 0);
 
130
        iuneq (1, 4, 0);
 
131
        iuneq (3, 3, 1);
 
132
        iuneq (5, 2, 0);
 
133
 
 
134
        ieq (1, 4, 0);
 
135
        ieq (3, 3, 1);
 
136
        ieq (5, 2, 0);
 
137
 
 
138
        iltgt (ninf, pinf, 1);
 
139
        iltgt (NaN, NaN, 0);
 
140
        iltgt (pinf, ninf, 1);
 
141
        iltgt (1, 4, 1);
 
142
        iltgt (3, 3, 0);
 
143
        iltgt (5, 2, 1);
 
144
 
 
145
        ine (1, 4, 1);
 
146
        ine (3, 3, 0);
 
147
        ine (5, 2, 1);
 
148
 
 
149
        iunlt (NaN, ninf, 1);
 
150
        iunlt (pinf, NaN, 1);
 
151
        iunlt (pinf, ninf, 0);
 
152
        iunlt (pinf, pinf, 0);
 
153
        iunlt (ninf, ninf, 0);
 
154
        iunlt (1, 4, 1);
 
155
        iunlt (3, 3, 0);
 
156
        iunlt (5, 2, 0);
 
157
 
 
158
        ilt (1, 4, 1);
 
159
        ilt (3, 3, 0);
 
160
        ilt (5, 2, 0);
 
161
 
 
162
        iunle (NaN, ninf, 1);
 
163
        iunle (pinf, NaN, 1);
 
164
        iunle (pinf, ninf, 0);
 
165
        iunle (pinf, pinf, 1);
 
166
        iunle (ninf, ninf, 1);
 
167
        iunle (1, 4, 1);
 
168
        iunle (3, 3, 1);
 
169
        iunle (5, 2, 0);
 
170
 
 
171
        ile (1, 4, 1);
 
172
        ile (3, 3, 1);
 
173
        ile (5, 2, 0);
 
174
 
 
175
        iungt (NaN, ninf, 1);
 
176
        iungt (pinf, NaN, 1);
 
177
        iungt (pinf, ninf, 1);
 
178
        iungt (pinf, pinf, 0);
 
179
        iungt (ninf, ninf, 0);
 
180
        iungt (1, 4, 0);
 
181
        iungt (3, 3, 0);
 
182
        iungt (5, 2, 1);
 
183
 
 
184
        igt (1, 4, 0);
 
185
        igt (3, 3, 0);
 
186
        igt (5, 2, 1);
 
187
 
 
188
        iunge (NaN, ninf, 1);
 
189
        iunge (pinf, NaN, 1);
 
190
        iunge (ninf, pinf, 0);
 
191
        iunge (pinf, pinf, 1);
 
192
        iunge (ninf, ninf, 1);
 
193
        iunge (1, 4, 0);
 
194
        iunge (3, 3, 1);
 
195
        iunge (5, 2, 1);
 
196
 
 
197
        ige (1, 4, 0);
 
198
        ige (3, 3, 1);
 
199
        ige (5, 2, 1);
 
200
 
 
201
        if (failed) {
 
202
                post_log ("Error in FPU math6 test\n");
 
203
                return -1;
 
204
        }
 
205
        return 0;
 
206
}
 
207
 
 
208
#endif /* CONFIG_POST & CONFIG_SYS_POST_FPU */