diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-11-29 11:10:10 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2016-11-29 11:10:10 (GMT) |
| commit | b91af81bc4ee0138c07c96e938c4878e0a8c06d9 (patch) | |
| tree | 305755843bb78eab3a9fa68148ec46585a11f31b /generic/tclTestObj.c | |
| parent | 7b4af51ed2c67661856796cc6669052b86bda825 (diff) | |
| download | tcl-b91af81bc4ee0138c07c96e938c4878e0a8c06d9.zip tcl-b91af81bc4ee0138c07c96e938c4878e0a8c06d9.tar.gz tcl-b91af81bc4ee0138c07c96e938c4878e0a8c06d9.tar.bz2 | |
more internal use of size_t (in stead of int)
Diffstat (limited to 'generic/tclTestObj.c')
| -rw-r--r-- | generic/tclTestObj.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclTestObj.c b/generic/tclTestObj.c index 06f8e5f..5627608 100644 --- a/generic/tclTestObj.c +++ b/generic/tclTestObj.c @@ -1101,7 +1101,7 @@ TestobjCmd( if (CheckIfVarUnset(interp, varPtr,varIndex)) { return TCL_ERROR; } - Tcl_SetObjResult(interp, Tcl_NewIntObj(varPtr[varIndex]->refCount)); + Tcl_SetObjResult(interp, Tcl_NewWideIntObj(varPtr[varIndex]->refCount)); } else if (strcmp(subCmd, "type") == 0) { if (objc != 3) { goto wrongNumArgs; |