diff options
author | Joseph C Wang <joequant@gmail.com> | 2017-11-26 03:42:32 +0800 |
---|---|---|
committer | Joseph C Wang <joequant@gmail.com> | 2017-11-26 03:42:32 +0800 |
commit | 9c32a1e722e01e3911a814cba701c9fd1c7871e0 (patch) | |
tree | f96de84ffa0f9b4f859ffd3438c8403c4c28af44 /Lib/r | |
parent | 5525abfea839905a940576455e77a76a70cc1fd0 (diff) | |
download | swig-9c32a1e722e01e3911a814cba701c9fd1c7871e0.tar.gz |
fix null changes to work with C90 compilers
Diffstat (limited to 'Lib/r')
-rw-r--r-- | Lib/r/rrun.swg | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Lib/r/rrun.swg b/Lib/r/rrun.swg index 7a94c28be..8067f0a18 100644 --- a/Lib/r/rrun.swg +++ b/Lib/r/rrun.swg @@ -260,10 +260,11 @@ AddOutputArgToReturn(int pos, SEXP value, const char *name, SEXP output) /* Create a new pointer object */ SWIGRUNTIMEINLINE SEXP SWIG_R_NewPointerObj(void *ptr, swig_type_info *type, int flags) { + SEXP rptr; if (!ptr) { return R_NilValue; } - SEXP rptr = R_MakeExternalPtr(ptr, + rptr = R_MakeExternalPtr(ptr, R_MakeExternalPtr(type, R_NilValue, R_NilValue), R_NilValue); SET_S4_OBJECT(rptr); return rptr; |