URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [objc/] [execute/] [protocol-isEqual-2.m] - Blame information for rev 825

Go to most recent revision | Details | Compare with Previous | View Log


/* Contributed by Nicola Pero - Fri Jun  4 03:16:17 BST 2004 */
/* Test that protocols with different names are different.  */
#include <objc/Protocol.h>
 
@protocol Foo1
- (void)foo1;
@end
 
@protocol Foo2
- (void)foo2;
@end
 
int main (void)
{
  if ([@protocol(Foo1) isEqual: @protocol(Foo2)])
    {
      abort ();
    }
 
  return 0;
}
 

Line No.	Rev	Author	Line
1	149	jeremybenn	`/* Contributed by Nicola Pero - Fri Jun 4 03:16:17 BST 2004 */`
2			`/* Test that protocols with different names are different. */`
3			`#include <objc/Protocol.h>`
4
5			`@protocol Foo1`
6			`- (void)foo1;`
7			`@end`
8
9			`@protocol Foo2`
10			`- (void)foo2;`
11			`@end`
12
13			`int main (void)`
14			`{`
15			`if ([@protocol(Foo1) isEqual: @protocol(Foo2)])`
16			`{`
17			`abort ();`
18			`}`
19
20			`return 0;`
21			`}`
22

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [objc/] [execute/] [protocol-isEqual-2.m] - Blame information for rev 825