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 38 |
Rev 154 |
/* Public domain. */
|
/* Public domain. */
|
typedef int SItype __attribute__ ((mode (SI)));
|
typedef int SItype __attribute__ ((mode (SI)));
|
typedef unsigned int USItype __attribute__ ((mode (SI)));
|
typedef unsigned int USItype __attribute__ ((mode (SI)));
|
typedef float SFtype __attribute__ ((mode (SF)));
|
typedef float SFtype __attribute__ ((mode (SF)));
|
|
|
SFtype
|
SFtype
|
__floatunsisf (USItype u)
|
__floatunsisf (USItype u)
|
{
|
{
|
SItype s = (SItype) u;
|
SItype s = (SItype) u;
|
if (s < 0)
|
if (s < 0)
|
{
|
{
|
/* As in expand_float, compute (u & 1) | (u >> 1) to ensure
|
/* As in expand_float, compute (u & 1) | (u >> 1) to ensure
|
correct rounding if a nonzero bit is shifted out. */
|
correct rounding if a nonzero bit is shifted out. */
|
return (SFtype) 2.0 * (SFtype) (SItype) ((u & 1) | (u >> 1));
|
return (SFtype) 2.0 * (SFtype) (SItype) ((u & 1) | (u >> 1));
|
}
|
}
|
else
|
else
|
return (SFtype) s;
|
return (SFtype) s;
|
}
|
}
|
|
|
© copyright 1999-2024
OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.