Mercurial > hg > CbC > CbC_gcc
view gcc/testsuite/objc.dg/try-catch-10.m @ 158:494b0b89df80 default tip
...
author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
---|---|
date | Mon, 25 May 2020 18:13:55 +0900 |
parents | 04ced10e8804 |
children |
line wrap: on
line source
/* Ensure that @try/@catch blocks do not mess with types of local objects (other than their volatile bits). */ /* { dg-options "-fobjc-exceptions" } */ /* { dg-do compile } */ #include "../objc-obj-c++-shared/TestsuiteObject.h" @protocol Proto1 - (int)meth1; @end @protocol Proto2 - (int)meth2; @end @interface MyClass: TestsuiteObject <Proto2> { int a; } - (int)meth2; - (TestsuiteObject *)parm1: (id)p1 parm2: (id<Proto1>)p2; @end MyClass *mc1, *mc2; @implementation MyClass - (int)meth2 { return a; } - (TestsuiteObject *)parm1: (id)p1 parm2: (id<Proto1>)p2 { @try { mc2 = p2; /* { dg-warning "type .id <Proto1>. does not conform to the .Proto2. protocol" } */ } @catch (id exc) { return exc; } mc1 = p1; /* no warning here! */ return self; } @end