xref: /netbsd-src/external/gpl3/gdb.old/dist/gdb/testsuite/gdb.base/skip.c (revision 8b657b0747480f8989760d71343d6dd33f8d4cf9)
1 /* This testcase is part of GDB, the GNU debugger.
2 
3    Copyright 2011-2023 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 #include <stdlib.h>
19 
20 int foo (void);
21 int bar (void);
22 int baz (int);
23 void skip1_test_skip_file_and_function (void);
24 void test_skip_file_and_function (void);
25 
26 int
27 main ()
28 {
29   int x;
30 
31   /* Use comma operator to sequence evaluation of bar and foo.  */
32   x = baz ((bar (), foo ()));
33 
34   test_skip_file_and_function ();
35 
36   return 0;
37 }
38 
39 int
40 foo ()
41 {
42   return 0;
43 }
44 
45 static void
46 test_skip (void)
47 {
48 }
49 
50 static void
51 end_test_skip_file_and_function (void)
52 {
53   abort ();
54 }
55 
56 void
57 test_skip_file_and_function (void)
58 {
59   test_skip ();
60   skip1_test_skip_file_and_function ();
61   end_test_skip_file_and_function ();
62 }
63