URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc1/] [gcc/] [testsuite/] [g++.dg/] [eh/] [filter1.C] - Rev 338
Compare with Previous | Blame | View Log
// Test that cleanups get run when a catch filter fails to match.
// { dg-do run }
extern "C" void exit(int);
extern "C" void abort();
struct a
{
a();
~a();
};
struct e1 {};
struct e2 {};
void
ex_test ()
{
a aa;
try
{
throw e1 ();
}
catch (e2 &)
{
}
}
int
main ()
{
try
{
ex_test ();
}
catch (...)
{
}
abort ();
}
a::a() { }
a::~a() { exit (0); }