95e4302a8f
PR gdb/15986 * gdb.base/run.c (main): gdb_get_line_number tag added for commands.exp. (factorial): Likewise. * gdb.base/commands.exp (watchpoint_command_test): Use gdb_get_line_number in order to determine the locations in run.c where local_var is detected to go out of scope.
78 lines
1.3 KiB
C
78 lines
1.3 KiB
C
/*
|
|
* This simple classical example of recursion is useful for
|
|
* testing stack backtraces and such.
|
|
*/
|
|
|
|
#ifdef vxworks
|
|
|
|
# include <stdio.h>
|
|
|
|
/* VxWorks does not supply atoi. */
|
|
static int
|
|
atoi (z)
|
|
char *z;
|
|
{
|
|
int i = 0;
|
|
|
|
while (*z >= '0' && *z <= '9')
|
|
i = i * 10 + (*z++ - '0');
|
|
return i;
|
|
}
|
|
|
|
/* I don't know of any way to pass an array to VxWorks. This function
|
|
can be called directly from gdb. */
|
|
|
|
vxmain (arg)
|
|
char *arg;
|
|
{
|
|
char *argv[2];
|
|
|
|
argv[0] = "";
|
|
argv[1] = arg;
|
|
main (2, argv, (char **) 0);
|
|
}
|
|
|
|
#else /* ! vxworks */
|
|
# include <stdio.h>
|
|
# include <stdlib.h>
|
|
#endif /* ! vxworks */
|
|
|
|
#ifdef PROTOTYPES
|
|
int factorial (int);
|
|
|
|
int
|
|
main (int argc, char **argv, char **envp)
|
|
#else
|
|
int
|
|
main (argc, argv, envp)
|
|
int argc;
|
|
char *argv[], **envp;
|
|
#endif
|
|
{
|
|
#ifdef FAKEARGV
|
|
printf ("%d\n", factorial (1)); /* commands.exp: hw local_var out of scope */
|
|
#else
|
|
if (argc != 2) {
|
|
printf ("usage: factorial <number>\n");
|
|
return 1;
|
|
} else {
|
|
printf ("%d\n", factorial (atoi (argv[1])));
|
|
}
|
|
#endif
|
|
return 0;
|
|
}
|
|
|
|
#ifdef PROTOTYPES
|
|
int factorial (int value)
|
|
#else
|
|
int factorial (value) int value;
|
|
#endif
|
|
{
|
|
int local_var;
|
|
|
|
if (value > 1) {
|
|
value *= factorial (value - 1);
|
|
}
|
|
local_var = value;
|
|
return (value);
|
|
} /* commands.exp: local_var out of scope */
|