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

Don't use long long if it isn't available

Browse source 
Adds preprocessor checks to avoid defining functions that use long long if it isn't available
Effects the following languages: javascript, octave, perl, python, r, ruby, tcl
This commit is contained in:
Alec Cooper 2016-01-01 15:32:53 -05:00
commit 4e2fc7d115
8 changed files with 108 additions and 36 deletions
Download patch file Download diff file Expand all files Collapse all files

20
Lib/r/rfragments.swg
View file

@ -44,21 +44,27 @@ SWIG_AsVal_dec(long)(SEXP obj, long *val)
}
%fragment(SWIG_From_frag(long long),"header") {
%fragment(SWIG_From_frag(long long),"header",
fragment="SWIG_LongLongAvailable") {
%#ifdef SWIG_LONG_LONG_AVAILABLE
SWIGINTERNINLINE SEXP
SWIG_From_dec(long long)(long long value)
{
return Rf_ScalarInteger((int)value);
}
%#endif
}
%fragment(SWIG_AsVal_frag(long long),"header") {
%fragment(SWIG_AsVal_frag(long long),"header",
fragment="SWIG_LongLongAvailable") {
%#ifdef SWIG_LONG_LONG_AVAILABLE
SWIGINTERNINLINE int
SWIG_AsVal_dec(long long)(SEXP obj, long long *val)
{
if (val) *val = Rf_asInteger(obj);
return SWIG_OK;
}
%#endif
}
%fragment(SWIG_From_frag(unsigned long),"header") {
@ -80,22 +86,28 @@ SWIG_AsVal_dec(unsigned long)(SEXP obj, unsigned long *val)
}
%fragment(SWIG_From_frag(unsigned long long),"header") {
%fragment(SWIG_From_frag(unsigned long long),"header",
fragment="SWIG_LongLongAvailable") {
%#ifdef SWIG_LONG_LONG_AVAILABLE
SWIGINTERNINLINE SEXP
SWIG_From_dec(unsigned long long)(unsigned long long value)
{
return Rf_ScalarInteger((int)value);
}
%#endif
}
%fragment(SWIG_AsVal_frag(unsigned long long),"header") {
%fragment(SWIG_AsVal_frag(unsigned long long),"header",
fragment="SWIG_LongLongAvailable") {
%#ifdef SWIG_LONG_LONG_AVAILABLE
SWIGINTERNINLINE int
SWIG_AsVal_dec(unsigned long long)(SEXP obj, unsigned long long *val)
{
if (val) *val = Rf_asInteger(obj);
return SWIG_OK;
}
%#endif
}
%fragment(SWIG_From_frag(double),"header") {