diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-12-23 08:27:02 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-12-23 08:27:02 (GMT) |
| commit | 753a557ea2976254eafdc0a1711fcf3ec34d0b2d (patch) | |
| tree | 460e57d9387e7eeee7114bee464bf2aedc9c0b2d /generic/tclObj.c | |
| parent | b82ed83ec2892183f6c503108b2c6bd610e94b2c (diff) | |
| download | tcl-753a557ea2976254eafdc0a1711fcf3ec34d0b2d.zip tcl-753a557ea2976254eafdc0a1711fcf3ec34d0b2d.tar.gz tcl-753a557ea2976254eafdc0a1711fcf3ec34d0b2d.tar.bz2 | |
Eliminate the internal macro/function TclNewIntObj: In all cases TclNewLongObj is just as good.
Diffstat (limited to 'generic/tclObj.c')
| -rw-r--r-- | generic/tclObj.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclObj.c b/generic/tclObj.c index 416e5ed..df900ce 100644 --- a/generic/tclObj.c +++ b/generic/tclObj.c @@ -1810,7 +1810,7 @@ Tcl_DbNewBooleanObj( TclDbNewObj(objPtr, file, line); objPtr->bytes = NULL; - objPtr->internalRep.longValue = (boolValue? 1 : 0); + objPtr->internalRep.longValue = (boolValue != 0); objPtr->typePtr = &tclIntType; return objPtr; } @@ -2425,7 +2425,7 @@ Tcl_NewIntObj( { register Tcl_Obj *objPtr; - TclNewIntObj(objPtr, intValue); + TclNewLongObj(objPtr, intValue); return objPtr; } #endif /* if TCL_MEM_DEBUG */ |