d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

did not work properly; assumet it could remove sign AFTER converting to

Browse source 
machine dependant order
This commit is contained in:
ceriel 1988-07-13 20:00:22 +00:00
parent c29ac899da
commit 1cf834f731
1 changed files with 8 additions and 19 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

27
mach/proto/fp/cmf8.c
View file

@ -21,7 +21,6 @@ _double d1,d2;
* return ((d1 < d2) ? 1 : (d1 > d2) ? -1 : 0))
*/
long l1,l2;
unsigned short *s1,*s2;
int sign1,sign2;
l1 = get4((char *)&d1);
@ -31,27 +30,17 @@ _double d1,d2;
if (sign1 != sign2)
return ((sign1 > 0) ? -1 : 1);
if (l1 != l2) { /* we can decide here */
s1 = (unsigned short *) &l1;
s2 = (unsigned short *) &l2;
/* set both signs positive */
*s1 &= ~0x8000;
*s2 &= ~0x8000;
/* we already know they aren't equal so */
return (sign1 * ((l1 < l2) ? 1 : -1));
return sign1 * (l1 < l2 ? 1 : -1) ;
}
else { /* decide in 2nd half */
l1 = get4(((char *)&d1 + 4));
l2 = get4(((char *)&d2 + 4));
l1 = get4(((char *)&d1 + 4));
l2 = get4(((char *)&d2 + 4));
if (l1 == l2)
return(0);
else {
s1 = (unsigned short *) &l1;
s2 = (unsigned short *) &l2;
if (*s1 == *s2) {
s1++;
s2++;
}
return (sign1 * ((*s1 < *s2) ? 1 : -1));
}
if (l1 < 0)
return l2 < 0 ? l2 > l1 : -1;
if (l2 < 0)
return 1;
return l2 > l1 ? 1 : -1;
}
}