+++ /dev/null
-double
-unsigned_to_double1 (u)
- unsigned u;
-{
- double d;
- d = (int) u; /* convert as from a *signed* integer */
- return ((int) u < 0)
- ? d + 4294967296.0
- : d;
-}
-
-/* Alternatively */
-
-double
-unsigned_to_double2 (u)
- unsigned u;
-{
- double d;
- u -= 2147483648; /* complement sign bit */
- d = (int) u; /* convert as from a *signed* integer */
- return d + 2147483648.0;
-}
-
-unsigned
-double_to_unsigned (d)
- double d;
-{
- d += 2147483648.0;
- return ((int) d) - 2147483648;
-}