URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [objc.dg/] [proto-hier-1.m] - Rev 716
Go to most recent revision | Compare with Previous | Blame | View Log
/* Test for handling of protocol hierarchies. */ /* Author: Ziemowit Laski <zlaski@apple.com>. */ /* { dg-do compile } */ /* One-line substitute for objc/objc.h */ typedef struct objc_object { struct objc_class *class_pointer; } *id; @protocol NSObj - (void)someMethod; @end @protocol NSCopying - (void)someOtherMethod; @end @interface NSObject <NSObj> - (void)someMethod; @end @implementation NSObject - (void)someMethod {} @end @protocol Booing <NSObj> - (void)boo; @end @interface Boo: NSObject <Booing> // protocol has only one parent @end @implementation Boo - (void)boo {} @end @protocol Fooing <NSCopying, NSObj> // Fooing has two parent protocols - (void)foo; @end @interface Foo: NSObject <Fooing> @end @implementation Foo - (void)foo {} - (void)someOtherMethod {} @end int foo(void) { id<Booing, Fooing> stupidVar; [stupidVar boo]; [stupidVar foo]; [stupidVar anotherMsg]; /* { dg-warning ".\\-anotherMsg. not found in protocol" } */ /* { dg-warning "no .\\-anotherMsg. method found" "" { target *-*-* } 51 } */ return 0; } /* { dg-warning "Messages without a matching method signature" "" { target *-*-* } 0 } */ /* { dg-warning "will be assumed to return .id. and accept" "" { target *-*-* } 0 } */ /* { dg-warning ".\.\.\.. as arguments" "" { target *-*-* } 0 } */
Go to most recent revision | Compare with Previous | Blame | View Log