Home | History | Annotate | Download | only in r 
      1 %include <typemaps/exception.swg>
      2 
      3 
      4 %insert("runtime") {
      5   %define_as(SWIG_exception(code, msg),
      6 %block(switch (code) {case SWIG_IndexError: return Rf_ScalarLogical(NA_LOGICAL); default: %error(code, msg); SWIG_fail;} ))
      7 }
      8 
      9