swig/Lib/tcl/exception.i
Marcelo Matus 7dc39f200c fix exception, use SWIG_fail
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@8589 626c5289-ae23-0410-ae9c-e8d60b6d4f22
2006-01-28 05:03:48 +00:00

6 lines
138 B
OpenEdge ABL

%include <typemaps/exception.swg>
%insert("runtime") {
%define_as(SWIG_exception(code, msg), %block(%error(code, msg); SWIG_fail;))
}