diff options
| author | Alec Cooper <ahnolds@gmail.com> | 2016-01-01 15:32:53 -0500 |
|---|---|---|
| committer | Alec Cooper <ahnolds@gmail.com> | 2016-01-06 16:52:37 -0500 |
| commit | 4e2fc7d1159d0023d9bce496599d56429dde9216 (patch) | |
| tree | 47c1248d3d1c2c74b443dfaf2b6282cef9de8396 /Lib/tcl | |
| parent | d2ab7e8bad6bbc140e745d74ab2b07447512d612 (diff) | |
| download | swig-4e2fc7d1159d0023d9bce496599d56429dde9216.tar.gz | |
Don't use long long if it isn't available
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
Diffstat (limited to 'Lib/tcl')
| -rw-r--r-- | Lib/tcl/tclprimtypes.swg | 16 |
1 files changed, 12 insertions, 4 deletions
diff --git a/Lib/tcl/tclprimtypes.swg b/Lib/tcl/tclprimtypes.swg index e781798e0..3b6d04f59 100644 --- a/Lib/tcl/tclprimtypes.swg +++ b/Lib/tcl/tclprimtypes.swg @@ -112,8 +112,9 @@ SWIG_AsVal_dec(unsigned long)(Tcl_Obj *obj, unsigned long *val) { %fragment(SWIG_From_frag(long long),"header", fragment=SWIG_From_frag(long), - fragment="<limits.h>", + fragment="SWIG_LongLongAvailable", fragment="<stdio.h>") { +%#ifdef SWIG_LONG_LONG_AVAILABLE SWIGINTERNINLINE Tcl_Obj* SWIG_From_dec(long long)(long long value) { @@ -125,11 +126,13 @@ SWIG_From_dec(long long)(long long value) return Tcl_NewStringObj(temp,-1); } } +%#endif } %fragment(SWIG_AsVal_frag(long long),"header", - fragment="<limits.h>", + fragment="SWIG_LongLongAvailable", fragment="<stdlib.h>") { +%#ifdef SWIG_LONG_LONG_AVAILABLE SWIGINTERN int SWIG_AsVal_dec(long long)(Tcl_Obj *obj, long long *val) { @@ -160,14 +163,16 @@ SWIG_AsVal_dec(long long)(Tcl_Obj *obj, long long *val) } return SWIG_TypeError; } +%#endif } /* unsigned long long */ %fragment(SWIG_From_frag(unsigned long long),"header", fragment=SWIG_From_frag(long long), - fragment="<limits.h>", + fragment="SWIG_LongLongAvailable", fragment="<stdio.h>") { +%#ifdef SWIG_LONG_LONG_AVAILABLE SWIGINTERNINLINE Tcl_Obj* SWIG_From_dec(unsigned long long)(unsigned long long value) { @@ -179,12 +184,14 @@ SWIG_From_dec(unsigned long long)(unsigned long long value) return Tcl_NewStringObj(temp,-1); } } +%#endif } %fragment(SWIG_AsVal_frag(unsigned long long),"header", fragment=SWIG_AsVal_frag(unsigned long), - fragment="<limits.h>", + fragment="SWIG_LongLongAvailable", fragment="<stdlib.h>") { +%#ifdef SWIG_LONG_LONG_AVAILABLE SWIGINTERN int SWIG_AsVal_dec(unsigned long long)(Tcl_Obj *obj, unsigned long long *val) { @@ -216,6 +223,7 @@ SWIG_AsVal_dec(unsigned long long)(Tcl_Obj *obj, unsigned long long *val) } return SWIG_TypeError; } +%#endif } /* double */ |