URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [unsorted/] [conv.c] - Blame information for rev 688

Details | Compare with Previous | View Log


double
u2d (unsigned int u)
{
  return u;
}
 
double
i2d (signed int i)
{
  return i;
}
 
unsigned int
d2u (double d)
{
  return d;
}
 
signed int
d2i (double d)
{
  return d;
}
 
main ()
{
  printf ("%lf, %lf, %lf\n", u2d (~0), u2d (1 << 31), u2d (1));
  printf ("%lf, %lf, %lf\n", i2d (~0), i2d (1 << 31), i2d (1));
 
  printf ("%u, %u, %u\n", d2u (u2d (~0)), d2u (u2d (1 << 31)), d2u (u2d (1)));
  printf ("%d, %d, %d\n", d2i (i2d (~0)), d2i (i2d (1 << 31)), d2i (i2d (1)));
}

Line No.	Rev	Author	Line
1	688	jeremybenn	`double`
2			`u2d (unsigned int u)`
3			`{`
4			`return u;`
5			`}`
6
7			`double`
8			`i2d (signed int i)`
9			`{`
10			`return i;`
11			`}`
12
13			`unsigned int`
14			`d2u (double d)`
15			`{`
16			`return d;`
17			`}`
18
19			`signed int`
20			`d2i (double d)`
21			`{`
22			`return d;`
23			`}`
24
25			`main ()`
26			`{`
27			`printf ("%lf, %lf, %lf\n", u2d (~0), u2d (1 << 31), u2d (1));`
28			`printf ("%lf, %lf, %lf\n", i2d (~0), i2d (1 << 31), i2d (1));`
29
30			`printf ("%u, %u, %u\n", d2u (u2d (~0)), d2u (u2d (1 << 31)), d2u (u2d (1)));`
31			`printf ("%d, %d, %d\n", d2i (i2d (~0)), d2i (i2d (1 << 31)), d2i (i2d (1)));`
32			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [unsorted/] [conv.c] - Blame information for rev 688