swig/Examples/test-suite/exception_order.i
2004-01-12 23:40:58 +00:00

54 lines
675 B
OpenEdge ABL

%module exception_order
%include "exception.i"
/*
last resource, catch everything but don't override
user's throw declarations.
*/
%exception {
try {
$action
} catch(...) {
SWIG_exception(SWIG_RuntimeError,"postcatch unknown");
}
}
%inline %{
struct E1
{
};
struct E2
{
};
struct E3
{
};
struct A
{
/* catched by the user's throw definition */
int foo() throw(E1)
{
throw E1();
return 0;
}
int bar() throw(E2)
{
throw E2();
return 0;
}
/* catched by the %postexception */
int foobar()
{
throw E3();
return 0;
}
};
%}