blob: e473a4772a9ee1316fb6ae36c1d76bf9ea78f584 [file] [log] [blame]
typedef struct sreal
{
unsigned sig; /* Significant. */
int exp; /* Exponent. */
} sreal;
sreal_compare (sreal *a, sreal *b)
{
if (a->exp > b->exp)
return 1;
if (a->exp < b->exp)
return -1;
if (a->sig > b->sig)
return 1;
if (a->sig < b->sig)
return -1;
return 0;
}
sreal a[] = {
{ 0, 0 },
{ 1, 0 },
{ 0, 1 },
{ 1, 1 }
};
int main()
{
int i, j;
for (i = 0; i <= 3; i++) {
for (j = 0; j < 3; j++) {
if (i < j && sreal_compare(&a[i], &a[j]) != -1) abort();
if (i == j && sreal_compare(&a[i], &a[j]) != 0) abort();
if (i > j && sreal_compare(&a[i], &a[j]) != 1) abort();
}
}
return 0;
}