URL
https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk
Go to most recent revision |
Only display areas with differences |
Details |
Blame |
View Log
Rev 149 |
Rev 154 |
double
|
double
|
unsigned_to_double1 (u)
|
unsigned_to_double1 (u)
|
unsigned u;
|
unsigned u;
|
{
|
{
|
double d;
|
double d;
|
d = (int) u; /* convert as from a *signed* integer */
|
d = (int) u; /* convert as from a *signed* integer */
|
return ((int) u < 0)
|
return ((int) u < 0)
|
? d + 4294967296.0
|
? d + 4294967296.0
|
: d;
|
: d;
|
}
|
}
|
|
|
/* Alternatively */
|
/* Alternatively */
|
|
|
double
|
double
|
unsigned_to_double2 (u)
|
unsigned_to_double2 (u)
|
unsigned u;
|
unsigned u;
|
{
|
{
|
double d;
|
double d;
|
u -= 2147483648; /* complement sign bit */
|
u -= 2147483648; /* complement sign bit */
|
d = (int) u; /* convert as from a *signed* integer */
|
d = (int) u; /* convert as from a *signed* integer */
|
return d + 2147483648.0;
|
return d + 2147483648.0;
|
}
|
}
|
|
|
unsigned
|
unsigned
|
double_to_unsigned (d)
|
double_to_unsigned (d)
|
double d;
|
double d;
|
{
|
{
|
d += 2147483648.0;
|
d += 2147483648.0;
|
return ((int) d) - 2147483648;
|
return ((int) d) - 2147483648;
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.