]> Git Repo - binutils.git/blob - gdb/testsuite/gdb.python/py-mi-var-info-path-expression.c
Update copyright year range in all GDB files.
[binutils.git] / gdb / testsuite / gdb.python / py-mi-var-info-path-expression.c
1 /* This testcase is part of GDB, the GNU debugger.
2
3    Copyright (C) 2018-2020 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 enum cons_type
19 {
20   type_atom = 0,
21   type_cons = 1
22 };
23
24 struct atom
25 {
26   int ival;
27 };
28
29 struct cons
30 {
31   enum cons_type type;
32   union
33   {
34     struct atom atom;
35     struct cons *slots[2];
36   };
37 };
38
39 #define nil ((struct cons*)0);
40
41 int
42 main ()
43 {
44   struct cons c1, c2, c3, c4;
45
46   c1.type = type_cons;
47   c1.slots[0] = &c4;
48   c1.slots[1] = &c2;
49
50   c2.type = type_cons;
51   c2.slots[0] = nil;
52   c2.slots[1] = &c3;
53
54   c3.type = type_cons;
55   c3.slots[0] = nil;
56   c3.slots[1] = nil;
57
58   c4.type = type_atom;
59   c4.atom.ival = 13;
60
61   return 0;                     /* next line */
62 }
This page took 0.029879 seconds and 4 git commands to generate.