diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-10-21 20:38:02 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-10-21 20:38:02 (GMT) |
| commit | d2c82fc45af53738344500a542ebe0333d5c89ac (patch) | |
| tree | b8f25cf083057f733c08529130bd925bef4513f5 /generic/tclScan.c | |
| parent | 7c2e55d3fd36b023222fe729d58855327f13c589 (diff) | |
| download | tcl-d2c82fc45af53738344500a542ebe0333d5c89ac.zip tcl-d2c82fc45af53738344500a542ebe0333d5c89ac.tar.gz tcl-d2c82fc45af53738344500a542ebe0333d5c89ac.tar.bz2 | |
Change PTR2INT and PTR2UINT macros's so they can handle long's and Tcl_WideInt's too, so no longer restricted to the "int" range.
Diffstat (limited to 'generic/tclScan.c')
| -rw-r--r-- | generic/tclScan.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/generic/tclScan.c b/generic/tclScan.c index 733409e..6a1311f 100644 --- a/generic/tclScan.c +++ b/generic/tclScan.c @@ -932,8 +932,7 @@ Tcl_ScanObjCmd( } } if ((flags & SCAN_UNSIGNED) && (wideValue < 0)) { - sprintf(buf, "%" TCL_LL_MODIFIER "u", - (Tcl_WideUInt)wideValue); + sprintf(buf, "%" TCL_LL_MODIFIER "u", wideValue); Tcl_SetStringObj(objPtr, buf, -1); } else { TclSetIntObj(objPtr, wideValue); |