OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [objc.dg/] [method-6.m] - Rev 309

Compare with Previous | Blame | View Log

/* Check that sending messages to variables of type 'Class' does not involve instance methods,
   unless they reside in root classes.  */
/* Author: Ziemowit Laski <zlaski@apple.com>  */
/* { dg-do compile } */
/* { dg-options "-Wstrict-selector-match" } */
 
#include "../objc-obj-c++-shared/Protocol1.h"
 
@interface Base
- (unsigned)port;
@end
 
@interface Derived: Base
- (Object *)port;
+ (Protocol *)port;
- (id)starboard;
@end
 
void foo(void) {
  Class receiver;
 
  [receiver port];  /* { dg-warning "multiple methods named .\\+port. found" } */
       /* { dg-message "using .\\-\\(unsigned( int)?\\)port." "" { target *-*-* } 10 } */
       /* { dg-message "also found .\\+\\(Protocol \\*\\)port." "" { target *-*-* } 15 } */
 
  [receiver starboard];  /* { dg-warning "no .\\+starboard. method found" } */
       /* { dg-warning "Messages without a matching method signature" "" { target *-*-* } 26 } */
       /* { dg-warning "will be assumed to return .id. and accept" "" { target *-*-* } 26 } */
       /* { dg-warning ".\.\.\.. as arguments" "" { target *-*-* } 26 } */
 
  [Class port];  /* { dg-error ".Class. is not an Objective\\-C class name or alias" } */
}
 

Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.