From b985529f9905b326d7da711ffbe28d80418c7ef8 Mon Sep 17 00:00:00 2001 From: sebres Date: Mon, 28 Jan 2019 16:12:56 +0000 Subject: [PATCH 1693/1800] fixes [4ee9b4f3e965a7da5133]: result of command `time` overflows by single iteration longer as 35 minutes (uses wide-int instead of int as result now). --- generic/tclCmdMZ.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/generic/tclCmdMZ.c b/generic/tclCmdMZ.c index db4e57b1e..b1ba3ae01 100644 --- a/generic/tclCmdMZ.c +++ b/generic/tclCmdMZ.c @@ -3931,7 +3931,7 @@ Tcl_TimeObjCmd( * Use int obj since we know time is not fractional. [Bug 1202178] */ - objs[0] = Tcl_NewIntObj((count <= 0) ? 0 : (int) totalMicroSec); + objs[0] = Tcl_NewWideIntObj((count <= 0) ? 0 : (Tcl_WideInt)totalMicroSec); } else { objs[0] = Tcl_NewDoubleObj(totalMicroSec/count); } -- 2.19.1