Windows fix (need to dllexport funtions)

git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@10101 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
William S Fulton 2007-11-10 22:23:53 +00:00
commit 12d39f7cb0

View file

@ -1774,7 +1774,7 @@ int R::functionWrapper(Node *n) {
Printf(stderr, "Adding a .copy argument to %s for %s = %s\n",
iname, type, addCopyParam ? "yes" : "no");
Printv(f->def, "SWIGINTERN SEXP\n", wname, " ( ", NIL);
Printv(f->def, "SWIGEXPORT SEXP\n", wname, " ( ", NIL);
Printf(sfun->def, "# Start of %s\n", iname);
Printv(sfun->def, "\n`", sfname, "` = function(", NIL);