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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [g++.dg/] [lto/] [20091004-3_1.C] - Blame information for rev 754

Go to most recent revision | Details | Compare with Previous | View Log


extern "C" double sqrt (double __x) throw ();
typedef double VECTOR[3];
enum { X = 0,  Y = 1,  Z = 2,  T = 3 };
inline void VLength(double& a, const VECTOR b)
{
  a = sqrt(b[X] * b[X] + b[Y] * b[Y] + b[Z] * b[Z]);
}
int
All_Torus_Intersections(void)
{
  double len;
  VECTOR D;
  VLength(len, D);
  VLength(len, D);
}
 

Line No.	Rev	Author	Line
1	693	jeremybenn	`extern "C" double sqrt (double __x) throw ();`
2			`typedef double VECTOR[3];`
3			`enum { X = 0, Y = 1, Z = 2, T = 3 };`
4			`inline void VLength(double& a, const VECTOR b)`
5			`{`
6			`a = sqrt(b[X] * b[X] + b[Y] * b[Y] + b[Z] * b[Z]);`
7			`}`
8			`int`
9			`All_Torus_Intersections(void)`
10			`{`
11			`double len;`
12			`VECTOR D;`
13			`VLength(len, D);`
14			`VLength(len, D);`
15			`}`
16

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [g++.dg/] [lto/] [20091004-3_1.C] - Blame information for rev 754