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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-6.8/] [gdb/] [testsuite/] [gdb.base/] [recurse.c] - Blame information for rev 178

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

Line No. Rev Author Line
1 24 jeremybenn
/* Trivial code used to test watchpoints in recursive code and
2
   auto-deletion of watchpoints as they go out of scope.  */
3
 
4
#ifdef PROTOTYPES
5
static int
6
recurse (int a)
7
#else
8
static int
9
recurse (a)
10
     int a;
11
#endif
12
{
13
  int b = 0;
14
 
15
  if (a == 1)
16
    return 1;
17
 
18
  b = a;
19
  b *= recurse (a - 1);
20
  return b;
21
}
22
 
23
int main()
24
{
25
#ifdef usestubs
26
  set_debug_traps();
27
  breakpoint();
28
#endif
29
  recurse (10);
30
  return 0;
31
}

powered by: WebSVN 2.1.0

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