diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-12-12 20:14:19 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2018-12-12 20:14:19 (GMT) |
| commit | 12859211484cfae1ab06fb9e00aebecfeca9ec1e (patch) | |
| tree | ae1b6847b057013742e00de29e2562fb8461530b /generic/tclStringObj.c | |
| parent | c60e1a679dc096b076279e0ef80a82fe41223a51 (diff) | |
| parent | 1961633531b70d5a6e627f86153f4d15e722ea8b (diff) | |
| download | tcl-12859211484cfae1ab06fb9e00aebecfeca9ec1e.zip tcl-12859211484cfae1ab06fb9e00aebecfeca9ec1e.tar.gz tcl-12859211484cfae1ab06fb9e00aebecfeca9ec1e.tar.bz2 | |
Merge 8.7
Diffstat (limited to 'generic/tclStringObj.c')
| -rw-r--r-- | generic/tclStringObj.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tclStringObj.c b/generic/tclStringObj.c index 5376f82..5b51ca5 100644 --- a/generic/tclStringObj.c +++ b/generic/tclStringObj.c @@ -2083,7 +2083,7 @@ Tcl_AppendFormatToObj( const char *bytes; if (useShort) { - pure = Tcl_NewIntObj(s); + pure = Tcl_NewWideIntObj(s); #ifndef TCL_WIDE_INT_IS_LONG } else if (useWide) { pure = Tcl_NewWideIntObj(w); @@ -2091,7 +2091,7 @@ Tcl_AppendFormatToObj( } else if (useBig) { pure = Tcl_NewBignumObj(&big); } else { - pure = Tcl_NewLongObj(l); + pure = Tcl_NewWideIntObj(l); } Tcl_IncrRefCount(pure); bytes = TclGetStringFromObj(pure, &length); @@ -2547,11 +2547,11 @@ AppendPrintfToObjVA( switch (size) { case -1: case 0: - Tcl_ListObjAppendElement(NULL, list, Tcl_NewLongObj( - (long) va_arg(argList, int))); + Tcl_ListObjAppendElement(NULL, list, Tcl_NewWideIntObj( + va_arg(argList, int))); break; case 1: - Tcl_ListObjAppendElement(NULL, list, Tcl_NewLongObj( + Tcl_ListObjAppendElement(NULL, list, Tcl_NewWideIntObj( va_arg(argList, long))); break; case 2: @@ -2582,7 +2582,7 @@ AppendPrintfToObjVA( break; case '*': lastNum = va_arg(argList, int); - Tcl_ListObjAppendElement(NULL, list, Tcl_NewIntObj(lastNum)); + Tcl_ListObjAppendElement(NULL, list, Tcl_NewWideIntObj(lastNum)); p++; break; case '0': case '1': case '2': case '3': case '4': |