3 unsigned sig
; /* Significant. */
4 int exp
; /* Exponent. */
7 sreal_compare (sreal
*a
, sreal
*b
)
30 for (i
= 0; i
<= 3; i
++) {
31 for (j
= 0; j
< 3; j
++) {
32 if (i
< j
&& sreal_compare(&a
[i
], &a
[j
]) != -1) abort();
33 if (i
== j
&& sreal_compare(&a
[i
], &a
[j
]) != 0) abort();
34 if (i
> j
&& sreal_compare(&a
[i
], &a
[j
]) != 1) abort();