forked from KolibriOS/kolibrios
c7fc8e91d0
git-svn-id: svn://kolibrios.org@6515 a494cfbc-eb01-0410-851d-a64ba20cac60
16 lines
384 B
C
16 lines
384 B
C
/* Public domain. */
|
|
typedef int SItype __attribute__ ((mode (SI)));
|
|
typedef unsigned int USItype __attribute__ ((mode (SI)));
|
|
typedef float XFtype __attribute__ ((mode (XF)));
|
|
|
|
XFtype
|
|
__floatunsixf (USItype u)
|
|
{
|
|
SItype s = (SItype) u;
|
|
XFtype r = (XFtype) s;
|
|
if (s < 0)
|
|
r += (XFtype)2.0 * (XFtype) ((USItype) 1
|
|
<< (sizeof (USItype) * __CHAR_BIT__ - 1));
|
|
return r;
|
|
}
|