111
|
1 /* { dg-do compile } */
|
|
2 /* { dg-options "-fdump-ada-spec" } */
|
|
3
|
|
4 struct S1 {
|
|
5 struct {
|
|
6 int i;
|
|
7 } F;
|
|
8 };
|
|
9
|
|
10 struct S2 {
|
|
11 union {
|
|
12 int i;
|
|
13 } F;
|
|
14 };
|
|
15
|
|
16 struct S3 {
|
|
17 struct {
|
|
18 int i;
|
|
19 } F[2];
|
|
20 };
|
|
21
|
|
22 struct S4 {
|
|
23 struct {
|
|
24 struct S4 *next;
|
|
25 } F;
|
|
26 };
|
|
27
|
|
28 struct S5 {
|
|
29 struct {
|
|
30 struct S5 *next;
|
|
31 } F[2];
|
|
32 };
|
|
33
|
|
34 struct S6 {
|
|
35 struct {
|
|
36 struct S6 *next[2];
|
|
37 } F;
|
|
38 };
|
|
39
|
|
40 struct S7 {
|
|
41 struct {
|
|
42 int i;
|
|
43 } F1[2];
|
|
44 struct {
|
|
45 float f;
|
|
46 } F2[2];
|
|
47 };
|
|
48
|
|
49 /* { dg-final { cleanup-ada-spec } } */
|