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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.2.2/] [gcc/] [testsuite/] [objc/] [execute/] [protocol-isEqual-3.m] - Blame information for rev 237

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 a protocol is not equal to nil.  */
#include <objc/Protocol.h>
 
@protocol Foo
- (void)foo;
@end
 
int main (void)
{
  if ([@protocol(Foo) isEqual: nil])
    {
      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 a protocol is not equal to nil. */`
3			`#include <objc/Protocol.h>`
4
5			`@protocol Foo`
6			`- (void)foo;`
7			`@end`
8
9			`int main (void)`
10			`{`
11			`if ([@protocol(Foo) isEqual: nil])`
12			`{`
13			`abort ();`
14			`}`
15
16			`return 0;`
17			`}`
18

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.2.2/] [gcc/] [testsuite/] [objc/] [execute/] [protocol-isEqual-3.m] - Blame information for rev 237