jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Improve R wrapper error message calling overloaded methods

Browse source 
when incorrect types passed are passed to the overloaded methods.

Old unhelpful error message:
  Error in f(...) : could not find function "f"

Example of new improved error message:
  Error in use_count(k) :
    cannot find overloaded function for use_count with argtypes (NULL)
This commit is contained in:
William S Fulton 2022-10-26 23:25:03 +01:00
commit f2da4f2ade
3 changed files with 18 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

12
Source/Modules/r.cxx
View file

@ -1566,7 +1566,8 @@ void R::dispatchFunction(Node *n) {
Printv(f->code,
"argtypes <- mapply(class, list(...));\n",
"argv <- list(...);\n",
"argc <- length(argtypes);\n", NIL );
"argc <- length(argtypes);\n",
"f <- NULL;\n", NIL);
Printf(f->code, "# dispatch functions %d\n", nfunc);
int cur_args = -1;
@ -1649,11 +1650,12 @@ void R::dispatchFunction(Node *n) {
}
}
if (cur_args != -1) {
Printf(f->code, "} else {\n"
"stop(\"cannot find overloaded function for %s with argtypes (\","
"toString(argtypes),\")\");\n"
"}", sfname);
Printf(f->code, "};\n");
}
Printf(f->code, "if (is.null(f)) {\n"
"stop(\"cannot find overloaded function for %s with argtypes (\","
"toString(argtypes),\")\");\n"
"}", sfname);
Printv(f->code, ";\nf(...)", NIL);
Printv(f->code, ";\n}", NIL);
Wrapper_print(f, sfile);