%include <typemaps/exception.swg>


%insert("runtime") {
  %define_as(SWIG_exception(code, msg), %block(%error(code, msg); return TCL_ERROR;))
}