Mercurial > hg > CbC > CbC_gcc

comparison gcc/config/floatunsitf.c @ 0:a06113de4d67

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
first commit
author kent <kent@cr.ie.u-ryukyu.ac.jp>
date Fri, 17 Jul 2009 14:47:48 +0900
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:a06113de4d67
1 /* Public domain. */
2 typedef int SItype __attribute__ ((mode (SI)));
3 typedef unsigned int USItype __attribute__ ((mode (SI)));
4 typedef float TFtype __attribute__ ((mode (TF)));
5
6 TFtype
7 __floatunsitf (USItype u)
8 {
9 SItype s = (SItype) u;
10 TFtype r = (TFtype) s;
11 if (s < 0)
12 r += (TFtype)2.0 * (TFtype) ((USItype) 1
13 << (sizeof (USItype) * __CHAR_BIT__ - 1));
14 return r;
15 }