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

Remove unused Printf() parameters.

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@9850 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Olly Betts 2007-06-06 00:58:50 +00:00
commit a6da185300
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
Source/Modules/r.cxx
View file

@ -606,7 +606,7 @@ String * R::createFunctionPointerHandler(SwigType *t, Node *n, int *numArgs) {
p = nextSibling(p);
if(p) {
Printf(f->def, ", ", i, tt, name);
Printf(f->def, ", ");
Printf(s_paramTypes, ", ");
}
}
@ -2157,7 +2157,7 @@ int R::defineArrayAccessors(SwigType *type) {
Wrapper_add_local(cGetItem, "__r_nprotect", "int __r_nprotect = 0");
Printf(cGetItem->code, "ptr = (%s *) R_SWIG_resolveExternalRef(s_x, \"\", \"s_x\", 0);\n", SwigType_lstr(base, 0));
Printf(cGetItem->code, "result = ptr[INTEGER(s_i)[0]];\n", tmp);
Printf(cGetItem->code, "result = ptr[INTEGER(s_i)[0]];\n");
tm = Swig_typemap_lookup_new("out", n, "result", 0);
@ -2224,7 +2224,7 @@ int R::defineArrayAccessors(SwigType *type) {
Delete(rclassName); Delete(rclassBase);
}
Printf(cSetItem->code, "ptr[INTEGER(s_i)[0]] = *el;\n", tmp);
Printf(cSetItem->code, "ptr[INTEGER(s_i)[0]] = *el;\n");
}
Printf(cSetItem->code, "%s\nreturn R_NilValue;\n}\n\n", UnProtectWrapupCode);
@ -2533,7 +2533,7 @@ int R::generateCopyRoutinesObsolete(Node *n) {
Printf(toC->def, "int\n%s(SEXP sobj, %s *value)", toCName, type);
Printf(toR->def, "SEXP\n%s(%s *value)", toRName, type);
Printf(toCRef->def, "SEXP\n%s(SEXP s_src, SEXP s_dest) {", copyRefRefName, type, type);
Printf(toCRef->def, "SEXP\n%s(SEXP s_src, SEXP s_dest) {", copyRefRefName);
Delete(toCName);
Delete(toRName);