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

fix unsigned cases

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@8039 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Marcelo Matus 2005-12-22 08:47:18 +00:00
commit 65d7d294d4
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
SWIG/Lib/tcl/tclprimtypes.swg
View file

@ -71,7 +71,7 @@ SWIGINTERN int
SWIG_AsVal_dec(unsigned long)(Tcl_Obj *obj, unsigned long *val) {
long v;
if (Tcl_GetLongFromObj(0,obj, &v) == TCL_OK) {
if (v > 0) {
if (v >= 0) {
if (val) *val = (long) v;
return SWIG_OK;
} else {
@ -171,7 +171,7 @@ SWIG_AsVal_dec(unsigned long long)(Tcl_Obj *obj, unsigned long long *val)
{
long v;
if (Tcl_GetLongFromObj(0,obj, &v) == TCL_OK) {
if (v > 0) {
if (v >= 0) {
if (val) *val = (long) v;
return SWIG_OK;
} else {