7 lines
145 B
OpenEdge ABL
7 lines
145 B
OpenEdge ABL
|
%include <typemaps/exception.swg>
|
||
|
|
|
||
|
|
|
||
|
|
%insert("runtime") {
|
||
|
|
%define_as(SWIG_exception(code, msg), %block(%error(code, msg); return TCL_ERROR;))
|
||
|
|
}
|