R - fix $typemap() for R specific typemaps

Add support for special variable replacement in the $typemap()
special variable macro for R specific typemaps (rtype, rtypecheck,
scoercein, scoereout).
This commit is contained in:
William S Fulton 2022-10-24 16:21:29 +01:00
commit 6370fab025
2 changed files with 16 additions and 1 deletions

View file

@ -242,8 +242,8 @@ public:
return status;
}
// Not used:
String *runtimeCode();
void replaceSpecialVariables(String *method, String *tm, Parm *parm);
protected:
int addRegistrationRoutine(String *rname, int nargs);
@ -2666,6 +2666,16 @@ String * R::runtimeCode() {
return s;
}
/*----------------------------------------------------------------------
* replaceSpecialVariables()
*--------------------------------------------------------------------*/
void R::replaceSpecialVariables(String *method, String *tm, Parm *parm) {
(void)method;
SwigType *type = Getattr(parm, "type");
replaceRClass(tm, type);
}
/* -----------------------------------------------------------------------
* Called when SWIG wants to initialize this