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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [g++.old-deja/] [g++.pt/] [recursion.C] - Blame information for rev 749

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

Line No. Rev Author Line
1 699 jeremybenn
// { dg-do assemble  }
2
 
3
const double M_PI=3.14159265358979323846;
4
 
5
template
6
inline double SineSeries()
7
{
8
  const double x=I*2*M_PI/N;
9
  const bool go=K+1!=J;
10
  return 1.0-x*x/(2*K+2)/(2*K+3)*SineSeries();
11
}
12
 
13
template<>
14
inline double SineSeries<0,0,0,0>()
15
{
16
  return 1.0;
17
}
18
 
19
template
20
inline double Sine()
21
{
22
  const double x=(I*2*M_PI/N);
23
  return x * SineSeries();
24
}
25
 
26
int main()
27
{
28
  double f=Sine<32,5>();
29
  return 0;
30
}
31
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.