kolibrios-fun/contrib/toolchain/gcc/5x/libgcc/floatunsisf.c
Sergey Semyonov (Serge) c7fc8e91d0 libgcc-5.4.0 initial commit
git-svn-id: svn://kolibrios.org@6515 a494cfbc-eb01-0410-851d-a64ba20cac60
2016-09-08 17:51:39 +00:00

19 lines
486 B
C

/* Public domain. */
typedef int SItype __attribute__ ((mode (SI)));
typedef unsigned int USItype __attribute__ ((mode (SI)));
typedef float SFtype __attribute__ ((mode (SF)));
SFtype
__floatunsisf (USItype u)
{
SItype s = (SItype) u;
if (s < 0)
{
/* As in expand_float, compute (u & 1) | (u >> 1) to ensure
correct rounding if a nonzero bit is shifted out. */
return (SFtype) 2.0 * (SFtype) (SItype) ((u & 1) | (u >> 1));
}
else
return (SFtype) s;
}