xref: /netbsd-src/external/gpl3/gdb.old/dist/gdb/testsuite/gdb.base/frameapply.c (revision 9fb66d812c00ebfb445c0b47dea128f32aa6fe96)
1 /* This testcase is part of GDB, the GNU debugger.
2 
3    Copyright 2018-2019 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 static void
19 setup_done (void)
20 {
21 }
22 
23 static int
24 f1 (int f1arg)
25 {
26   int f1loc;
27 
28   f1loc = f1arg - 1;
29 
30   setup_done ();
31   return f1loc;
32 }
33 
34 static int
35 f2 (int f2arg)
36 {
37   int f2loc;
38 
39   f2loc = f1 (f2arg - 1);
40 
41   return f2loc;
42 }
43 
44 static int
45 f3 (int f3arg)
46 {
47   int f3loc;
48 
49   f3loc = f2 (f3arg - 1);
50 
51   return f3loc;
52 }
53 
54 static int
55 f4 (int f4arg)
56 {
57   int f4loc;
58 
59   f4loc = f3 (f4arg - 1);
60 
61   return f4loc;
62 }
63 
64 int
65 main (void)
66 {
67   int result;
68 
69   result = f4 (4);
70   return 0;
71 }
72