[gdb/testsuite] Factor out lib/valgrind.exp
[external/binutils.git] / gdb / testsuite / gdb.base / nested-subp1.c
1 /* This test program is part of GDB, the GNU debugger.
2
3    Copyright 2015-2018 Free Software Foundation, Inc.
4
5    This program is free software; you can redistribute it and/or modify
6    it under the terms of the GNU General Public License as published by
7    the Free Software Foundation; either version 3 of the License, or
8    (at your option) any later version.
9
10    This program is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13    GNU General Public License for more details.
14
15    You should have received a copy of the GNU General Public License
16    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
17
18 int
19 foo (int i1)
20 {
21   int
22   nested (int i2)
23   {
24     /* Here with i1 and i2, we can test that GDB can fetch both a local and a
25        non-local variable in the most simple nested function situation: the
26        parent block instance is accessible as the directly upper frame.  */
27     return i1 * i2; /* STOP */
28   }
29
30   return nested (i1 + 1);
31 }
32
33 int
34 main ()
35 {
36   return !foo (1);
37 }