Mercurial > hg > CbC > CbC_gcc
view gcc/testsuite/obj-c++.dg/method-12.mm @ 144:8f4e72ab4e11
fix segmentation fault caused by nothing next cur_op to end
author | Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp> |
---|---|
date | Sun, 23 Dec 2018 21:23:56 +0900 |
parents | 04ced10e8804 |
children | 1830386684a0 |
line wrap: on
line source
/* 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-options "-Wstrict-selector-match" } */ /* { dg-do compile } */ /* { dg-skip-if "Object interface removed" { *-*-darwin[1-2]* && { lp64 } } { "-fnext-runtime" } { "" } } */ #include <objc/Protocol.h> @interface Base - (unsigned)port; /* { dg-line Base_port } */ @end @interface Derived: Base - (Object *)port; + (Protocol *)port; /* { dg-line Derived_port_last } */ - (id)starboard; @end void foo(void) { Class receiver; [receiver port]; /* { dg-warning "multiple methods named .\\+port. found" } */ /* { dg-message "using .\\-\\(unsigned( int)?\\)port." "" { target *-*-* } Base_port } */ /* { dg-message "also found .\\+\\(Protocol \\*\\)port." "" { target *-*-* } Derived_port_last } */ [receiver starboard]; /* { dg-warning "no .\\+starboard. method found" } */ /* { dg-warning "Messages without a matching method signature" "" { target *-*-* } .-1 } */ /* { dg-warning "will be assumed to return .id. and accept" "" { target *-*-* } .-2 } */ /* { dg-warning ".\.\.\.. as arguments" "" { target *-*-* } .-3 } */ [Class port]; /* { dg-error ".Class. is not an Objective\\-C class name or alias" } */ }