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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [g++.dg/] [cpp0x/] [lambda/] [lambda-recursive.C] - Blame information for rev 307

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

Line No. Rev Author Line
1 301 jeremybenn
// { dg-do "run" }
2
// { dg-options "-std=c++0x" }
3
 
4
//#include 
5
#include 
6
#include 
7
 
8
int main() {
9
 
10
  std::function fib = [&fib] (int n) -> int {
11
    //std::cerr << "fib(" << n << ")\n";
12
    if (n <= 2) return 1;
13
    else        return fib(n-1) + fib(n-2);
14
  };
15
 
16
  assert(fib(5) == 5);
17
  assert(fib(10) == 55);
18
 
19
  return 0;
20
}
21
 

powered by: WebSVN 2.1.0

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