OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [objc.dg/] [try-catch-5.m] - Rev 704

Compare with Previous | Blame | View Log

/* Check that the compiler does correctly complain about
   exceptions being caught by previous @catch blocks.  */
/* Force the use of NeXT runtime to see that we don't ICE after
   generating the warning message.  */
 
/* { dg-do compile } */
/* { dg-options "-Wall -fobjc-exceptions" } */
 
@interface Exception
@end
 
@interface FooException : Exception
@end
 
extern void foo();
 
void test()
{
    @try {
        foo();
    }
    @catch (Exception* e) {	/* { dg-warning "earlier handler" } */
    }
    @catch (FooException* fe) {	/* { dg-warning "will be caught" } */
    }
}
 
 

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.