OSDN Git Service

r284@cf-ppc-macosx: monabuilder | 2008-12-07 10:57:41 +0900
[pf3gnuchains/pf3gnuchains3x.git] / gdb / testsuite / gdb.base / setvar.c
1 #include <stdlib.h>
2
3 #ifdef PROTOTYPES
4 int main (int argc, char **argv, char **envp)
5 #else
6 main (argc, argv, envp)
7      int argc;
8      char **argv;
9      char **envp;
10 #endif
11 {
12     extern void dummy();
13 #ifdef usestubs
14     set_debug_traps();
15     breakpoint();
16 #endif
17     dummy();
18     return 0;
19 }
20
21 /* We put main() right up front so its line number doesn't keep changing.  */
22
23 /*
24  *      Test file with lots of different types, for testing the
25  *      "whatis" command.
26  */
27
28 /*
29  *      First the basic C types.
30  */
31
32 #if !defined (__STDC__) && !defined (_AIX)
33 #define signed  /**/
34 #endif
35
36 char            v_char;
37 signed char     v_signed_char;
38 unsigned char   v_unsigned_char;
39
40 short           v_short;
41 signed short    v_signed_short;
42 unsigned short  v_unsigned_short;
43
44 int             v_int;
45 signed int      v_signed_int;
46 unsigned int    v_unsigned_int;
47
48 long            v_long;
49 signed long     v_signed_long;
50 unsigned long   v_unsigned_long;
51
52 float           v_float;
53 double          v_double;
54
55 /*
56  *      Now some derived types, which are arrays, functions-returning,
57  *      pointers, structures, unions, and enumerations.
58  */
59
60 /**** arrays *******/
61
62 char            v_char_array[2];
63 signed char     v_signed_char_array[2];
64 unsigned char   v_unsigned_char_array[2];
65
66 short           v_short_array[2];
67 signed short    v_signed_short_array[2];
68 unsigned short  v_unsigned_short_array[2];
69
70 int             v_int_array[2];
71 signed int      v_signed_int_array[2];
72 unsigned int    v_unsigned_int_array[2];
73
74 long            v_long_array[2];
75 signed long     v_signed_long_array[2];
76 unsigned long   v_unsigned_long_array[2];
77
78 float           v_float_array[2];
79 double          v_double_array[2];
80
81 /**** pointers *******/
82
83 char            *v_char_pointer;
84 signed char     *v_signed_char_pointer;
85 unsigned char   *v_unsigned_char_pointer;
86
87 short           *v_short_pointer;
88 signed short    *v_signed_short_pointer;
89 unsigned short  *v_unsigned_short_pointer;
90
91 int             *v_int_pointer;
92 signed int      *v_signed_int_pointer;
93 unsigned int    *v_unsigned_int_pointer;
94
95 long            *v_long_pointer;
96 signed long     *v_signed_long_pointer;
97 unsigned long   *v_unsigned_long_pointer;
98
99 float           *v_float_pointer;
100 double          *v_double_pointer;
101
102 /**** structs *******/
103
104 struct t_struct {
105     char        v_char_member;
106     short       v_short_member;
107     int         v_int_member;
108     long        v_long_member;
109     float       v_float_member;
110     double      v_double_member;
111 } v_struct1;
112
113 struct {
114     char        v_char_member;
115     short       v_short_member;
116     int         v_int_member;
117     long        v_long_member;
118     float       v_float_member;
119     double      v_double_member;
120 } v_struct2;
121
122 /**** unions *******/
123
124 union t_union {
125     char        v_char_member;
126     short       v_short_member;
127     int         v_int_member;
128     long        v_long_member;
129     float       v_float_member;
130     double      v_double_member;
131 } v_union;
132
133 union {
134     char        v_char_member;
135     short       v_short_member;
136     int         v_int_member;
137     long        v_long_member;
138     float       v_float_member;
139     double      v_double_member;
140 } v_union2;
141
142 /*** Functions returning type ********/
143
144 char            v_char_func () { return(0); }
145 signed char     v_signed_char_func () { return (0); }
146 unsigned char   v_unsigned_char_func () { return (0); }
147
148 short           v_short_func () { return (0); }
149 signed short    v_signed_short_func () { return (0); }
150 unsigned short  v_unsigned_short_func () { return (0); }
151
152 int             v_int_func () { return (0); }
153 signed int      v_signed_int_func () { return (0); }
154 unsigned int    v_unsigned_int_func () { return (0); }
155
156 long            v_long_func () { return (0); }
157 signed long     v_signed_long_func () { return (0); }
158 unsigned long   v_unsigned_long_func () { return (0); }
159
160 float           v_float_func () { return (0.0); }
161 double          v_double_func () { return (0.0); }
162
163 /**** Some misc more complicated things *******/
164
165 struct link {
166         struct link *next;
167 #ifdef __STDC__
168         struct link *(*linkfunc) (struct link *this, int flags);
169 #else
170         struct link *(*linkfunc) ();
171 #endif
172         struct t_struct stuff[1][2][3];
173 } *s_link;
174
175 union tu_link {
176         struct link *next;
177 #ifdef __STDC__
178         struct link *(*linkfunc) (struct link *this, int flags);
179 #else
180         struct link *(*linkfunc) ();
181 #endif
182         struct t_struct stuff[1][2][3];
183 } u_link;
184
185 /**** Enumerations *******/
186
187 enum colors {red, green, blue} color;
188 enum cars {chevy, ford, porsche} clunker;
189
190 /**** Enumeration bitfields, supported by GNU C *******/
191
192 #ifdef __GNUC__
193 enum senum {sm1 = -1, s1 = 1};
194 struct senum_field {enum senum field:2; } sef;
195 enum uenum {u1 = 1, u2 = 2};
196 struct uenum_field {enum uenum field:2; } uef;
197 #endif
198
199 void
200 dummy ()
201 {
202   /* setvar.exp wants to allocate memory for constants.  So make sure malloc
203      gets linked into the program.  */
204   malloc (1);
205
206   /* Some linkers (e.g. on AIX) remove unreferenced variables,
207      so make sure to reference them. */
208   v_char = 0;
209   v_signed_char = 1;
210   v_unsigned_char = 2;
211
212   v_short = 3;
213   v_signed_short = 4;
214   v_unsigned_short = 5;    
215
216   v_int = 6;
217   v_signed_int = 7;
218   v_unsigned_int = 8;    
219
220   v_long = 9;
221   v_signed_long = 10;
222   v_unsigned_long = 11;    
223   
224   v_float = 100.0;
225   v_double = 200.0;
226
227
228   v_char_array[0] = v_char;
229   v_signed_char_array[0] = v_signed_char;
230   v_unsigned_char_array[0] = v_unsigned_char;
231
232   v_short_array[0] = v_short;
233   v_signed_short_array[0] = v_signed_short;
234   v_unsigned_short_array[0] = v_unsigned_short;
235
236   v_int_array[0] = v_int;
237   v_signed_int_array[0] = v_signed_int;
238   v_unsigned_int_array[0] = v_unsigned_int;
239
240   v_long_array[0] = v_long;
241   v_signed_long_array[0] = v_signed_long;
242   v_unsigned_long_array[0] = v_unsigned_long;
243
244   v_float_array[0] = v_float;
245   v_double_array[0] = v_double;
246
247   v_char_pointer = &v_char;
248   v_signed_char_pointer = &v_signed_char;
249   v_unsigned_char_pointer = &v_unsigned_char;
250
251   v_short_pointer = &v_short;
252   v_signed_short_pointer = &v_signed_short;
253   v_unsigned_short_pointer = &v_unsigned_short;
254
255   v_int_pointer = &v_int;
256   v_signed_int_pointer = &v_signed_int;
257   v_unsigned_int_pointer = &v_unsigned_int;
258
259   v_long_pointer = &v_long;
260   v_signed_long_pointer = &v_signed_long;
261   v_unsigned_long_pointer = &v_unsigned_long;
262
263   v_float_pointer = &v_float;
264   v_double_pointer = &v_double;
265
266   color = red;
267   clunker = porsche;
268
269   u_link.next = s_link;
270
271   v_struct2.v_int_member = v_struct1.v_int_member;
272   v_union2.v_short_member = v_union.v_short_member;
273
274 #ifdef __GNUC__
275   sef.field = s1;
276   uef.field = u1;
277 #endif
278 }