1 /* Test support of scalar_storage_order attribute */
2
3 /* { dg-do compile } */
4
5 struct S1
6 {
7 int i;
8 } __attribute__((scalar_storage_order("big-endian")));
9
10 struct S2
11 {
12 int i;
13 } __attribute__((scalar_storage_order("little-endian")));
14
15 struct S3 { int i; } __attribute__((scalar_storage_order("other"))); /* { dg-error "must be one of .big-endian. or .little-endian." } */
16
incompatible_assign(struct S1 * s1,struct S2 * s2)17 void incompatible_assign (struct S1 *s1, struct S2 *s2)
18 {
19 *s1 = *s2; /* { dg-error "(incompatible types|no match)" } */
20 }
21
addr1(int which,struct S1 * s1,struct S2 * s2)22 int *addr1 (int which, struct S1 *s1, struct S2 *s2)
23 {
24 return (which == 1 ? &s1->i : &s2->i); /* { dg-error "address of scalar with reverse storage order" } */
25 }
26
27 struct S4
28 {
29 int a[4];
30 struct S2 s2;
31 } __attribute__((scalar_storage_order("big-endian")));
32
33 struct S5
34 {
35 int a[4];
36 struct S1 s1;
37 } __attribute__((scalar_storage_order("little-endian")));
38
addr2(int which,struct S4 * s4,struct S5 * s5)39 void *addr2 (int which, struct S4 *s4, struct S5 *s5)
40 {
41 return (which == 1 ? (void *)s4->a : (void *)s5->a); /* { dg-warning "address of array with reverse scalar storage order" } */
42 }
43
addr3(int which,struct S4 * s4,struct S5 * s5)44 void *addr3 (int which, struct S4 *s4, struct S5 *s5)
45 {
46 return (which == 1 ? (void *)&s4->a : (void *)&s5->a); /* { dg-warning "address of array with reverse scalar storage order" } */
47 }
48
addr4(int which,struct S4 * s4,struct S5 * s5)49 void *addr4 (int which, struct S4 *s4, struct S5 *s5)
50 {
51 return (which == 1 ? (void *)&s4->a[0] : (void *)&s5->a[0]); /* { dg-error "address of scalar with reverse storage order" } */
52 }
53
addr5(int which,struct S4 * s4,struct S5 * s5)54 void *addr5 (int which, struct S4 *s4, struct S5 *s5)
55 {
56 return (which == 1 ? (void *)&s4->s2 : (void *) &s5->s1); /* ok */
57 }
58
59 struct S6
60 {
61 int a[4][2];
62 struct S2 s2[2];
63 } __attribute__((scalar_storage_order("big-endian")));
64
65 struct S7
66 {
67 int a[4][2];
68 struct S1 s1[2];
69 } __attribute__((scalar_storage_order("little-endian")));
70
addr6(int which,struct S6 * s6,struct S7 * s7)71 void *addr6 (int which, struct S6 *s6, struct S7 *s7)
72 {
73 return (which == 1 ? (void *)s6->a : (void *)s7->a); /* { dg-warning "address of array with reverse scalar storage order" } */
74 }
75
addr7(int which,struct S6 * s6,struct S7 * s7)76 void *addr7 (int which, struct S6 *s6, struct S7 *s7)
77 {
78 return (which == 1 ? (void *)&s6->a : (void *)&s7->a); /* { dg-warning "address of array with reverse scalar storage order" } */
79 }
80
addr8(int which,struct S6 * s6,struct S7 * s7)81 void *addr8 (int which, struct S6 *s6, struct S7 *s7)
82 {
83 return (which == 1 ? (void *)&s6->a[0] : (void *)&s7->a[0]); /* { dg-warning "address of array with reverse scalar storage order" } */
84 }
85
addr9(int which,struct S6 * s6,struct S7 * s7)86 void *addr9 (int which, struct S6 *s6, struct S7 *s7)
87 {
88 return (which == 1 ? (void *)&s6->a[0][0] : (void *)&s7->a[0][0]); /* { dg-error "address of scalar with reverse storage order" } */
89 }
90
addr10(int which,struct S6 * s6,struct S7 * s7)91 void *addr10 (int which, struct S6 *s6, struct S7 *s7)
92 {
93 return (which == 1 ? (void *)&s6->s2 : (void *)&s7->s1); /* ok */
94 }
95