mirror of
https://github.com/bitwiseworks/gcc-os2.git
synced 2026-07-09 02:06:52 +00:00
fbf7869a1b
Source URL: git://gcc.gnu.org/git/gcc.git Source Commit: 3e7b85061947bdc7c7465743ba90734566860821
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 TFtype __attribute__ ((mode (TF)));
|
|
|
|
TFtype
|
|
__floatunsitf (USItype u)
|
|
{
|
|
SItype s = (SItype) u;
|
|
TFtype r = (TFtype) s;
|
|
if (s < 0)
|
|
r += (TFtype)2.0 * (TFtype) ((USItype) 1
|
|
<< (sizeof (USItype) * __CHAR_BIT__ - 1));
|
|
return r;
|
|
}
|