1 /* Test assignments and comparisons between protocols (obscure case). */
2 /* Author: Nicola Pero <nicola@brainstorm.co.uk>. */
3 /* { dg-do compile } */
15 @protocol MyProtocolAB <MyProtocolA, MyProtocolB>
18 @protocol MyProtocolAC <MyProtocolA>
24 id<MyProtocolA> obj_a = nil;
25 id<MyProtocolB> obj_b = nil;
26 id<MyProtocolAB> obj_ab = nil;
27 id<MyProtocolAC> obj_ac = nil;
29 obj_a = obj_b; /* { dg-warning "does not conform" } */
30 obj_a = obj_ab; /* Ok */
31 obj_a = obj_ac; /* Ok */
33 obj_b = obj_a; /* { dg-warning "does not conform" } */
34 obj_b = obj_ab; /* Ok */
35 obj_b = obj_ac; /* { dg-warning "does not conform" } */
37 obj_ab = obj_a; /* { dg-warning "does not conform" } */
38 obj_ab = obj_b; /* { dg-warning "does not conform" } */
39 obj_ab = obj_ac; /* { dg-warning "does not conform" } */
41 obj_ac = obj_a; /* { dg-warning "does not conform" } */
42 obj_ac = obj_b; /* { dg-warning "does not conform" } */
43 obj_ac = obj_ab; /* { dg-warning "does not conform" } */
45 if (obj_a == obj_b) ; /* { dg-warning "lacks a cast" } */
46 if (obj_b == obj_a) ; /* { dg-warning "lacks a cast" } */
48 if (obj_a == obj_ab) ; /* Ok */
49 if (obj_ab == obj_a) ; /* Ok */ /* Spurious 2.95.4 warning here */
51 if (obj_a == obj_ac) ; /* Ok */
52 if (obj_ac == obj_a) ; /* Ok */ /* Spurious 2.95.4 warning here */
54 if (obj_b == obj_ab) ; /* Ok */
55 if (obj_ab == obj_b) ; /* Ok */ /* Spurious 2.95.4 warning here */
57 if (obj_b == obj_ac) ; /* { dg-warning "lacks a cast" } */
58 if (obj_ac == obj_b) ; /* { dg-warning "lacks a cast" } */
60 if (obj_ab == obj_ac) ; /* { dg-warning "lacks a cast" } */
61 if (obj_ac == obj_ab) ; /* { dg-warning "lacks a cast" } */