don't free if the pointer is marked as output
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@12950 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
parent
31ae30515f
commit
77a353a6ba
1 changed files with 11 additions and 2 deletions
13
Lib/r/r.swg
13
Lib/r/r.swg
|
|
@ -109,6 +109,17 @@ SWIG_InitializeModule(0);
|
|||
free($1);
|
||||
%}
|
||||
|
||||
%typemap(freearg, noblock=1) int *OUTPUT,
|
||||
signed int *OUTPUT,
|
||||
unsigned int *OUTPUT,
|
||||
short *OUTPUT,
|
||||
signed short *OUTPUT,
|
||||
long *OUTPUT,
|
||||
signed long *OUTPUT,
|
||||
long long *OUTPUT,
|
||||
unsigned long long *OUTPUT,
|
||||
float *OUTPUT,
|
||||
double *OUTPUT {}
|
||||
|
||||
|
||||
|
||||
|
|
@ -132,8 +143,6 @@ SWIG_InitializeModule(0);
|
|||
};
|
||||
%}
|
||||
|
||||
|
||||
%include <typemaps/swigmacros.swg>
|
||||
%include <typemaps/fragments.swg>
|
||||
%include <rfragments.swg>
|
||||
%include <ropers.swg>
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue