| %module exception_partial_info |
| |
| // This produced compilable code for Tcl, Python in 1.3.27, fails in 1.3.29 |
| |
| %{ |
| #if defined(_MSC_VER) |
| #pragma warning(disable: 4290) // C++ exception specification ignored except to indicate a function is not __declspec(nothrow) |
| #endif |
| %} |
| |
| %{ |
| class myException |
| { |
| public: |
| virtual const char *name() = 0; |
| }; |
| |
| class ex1 : public myException |
| { |
| public: |
| virtual const char *name() { return "ex1"; } |
| }; |
| |
| class ex2 : public myException |
| { |
| public: |
| virtual const char *name() { return "ex2"; } |
| }; |
| %} |
| |
| #if !defined(SWIGUTL) |
| |
| #if !defined(SWIGCHICKEN) |
| |
| %inline %{ |
| class Impl |
| { |
| public: |
| void f1() throw (myException) { ex1 e; throw e; } |
| void f2() throw (myException) { ex2 e; throw e; } |
| }; |
| %} |
| |
| #else |
| #warning "Chicken needs fixing for partial exception information" |
| #endif |
| |
| #else |
| #warning "UTL needs fixing for partial exception information" |
| #endif |
| |