Mercurial > hg > CbC > CbC_gcc

annotate gcc/testsuite/objc.dg/comp-types-5.m @ 158:494b0b89df80 default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 25 May 2020 18:13:55 +0900
parents 04ced10e8804
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
111
kono
parents:
diff changeset
1 /* Test assignments and comparisons involving `one-off' protocols. */
kono
parents:
diff changeset
2 /* Author: Nicola Pero <nicola@brainstorm.co.uk>. */
kono
parents:
diff changeset
3 /* { dg-do compile } */
kono
parents:
diff changeset
4 #include <objc/objc.h>
kono
parents:
diff changeset
5
kono
parents:
diff changeset
6 @protocol MyProtocol
kono
parents:
diff changeset
7 - (void) method;
kono
parents:
diff changeset
8 @end
kono
parents:
diff changeset
9
kono
parents:
diff changeset
10 @interface MyClass
kono
parents:
diff changeset
11 @end
kono
parents:
diff changeset
12
kono
parents:
diff changeset
13 int main()
kono
parents:
diff changeset
14 {
kono
parents:
diff changeset
15 id obj = nil;
kono
parents:
diff changeset
16 id <MyProtocol> obj_p = nil;
kono
parents:
diff changeset
17 MyClass<MyProtocol> *obj_cp = nil;
kono
parents:
diff changeset
18
kono
parents:
diff changeset
19 obj_cp = obj; /* Ok */
kono
parents:
diff changeset
20 obj = obj_cp; /* Ok */
kono
parents:
diff changeset
21
kono
parents:
diff changeset
22 obj_cp = obj_p; /* Ok */
kono
parents:
diff changeset
23 obj_p = obj_cp; /* Ok */
kono
parents:
diff changeset
24
kono
parents:
diff changeset
25 if (obj_cp == obj) ; /* Ok */
kono
parents:
diff changeset
26 if (obj == obj_cp) ; /* Ok */
kono
parents:
diff changeset
27
kono
parents:
diff changeset
28 if (obj_cp == obj_p) ; /* Ok */
kono
parents:
diff changeset
29 if (obj_p == obj_cp) ; /* Ok */
kono
parents:
diff changeset
30
kono
parents:
diff changeset
31 return 0;
kono
parents:
diff changeset
32 }