diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-11-20 20:18:08 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-11-20 20:18:08 (GMT) |
| commit | 2f3087ea8f42ed192da6b35b4cd230cb74f0fd6a (patch) | |
| tree | 72ca5538c8c9e57c34108d97c25286e2e7ab4151 /generic/tclClock.c | |
| parent | bfdd211de9210e8b9cf5af6cf3aa03a4698ef0ee (diff) | |
| parent | ba25919a60b33720617b9f5c8fd1ef4a1a92d0c7 (diff) | |
| download | tcl-2f3087ea8f42ed192da6b35b4cd230cb74f0fd6a.zip tcl-2f3087ea8f42ed192da6b35b4cd230cb74f0fd6a.tar.gz tcl-2f3087ea8f42ed192da6b35b4cd230cb74f0fd6a.tar.bz2 | |
Rebase to latest 8.7
Diffstat (limited to 'generic/tclClock.c')
| -rw-r--r-- | generic/tclClock.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclClock.c b/generic/tclClock.c index a9ba70c..d64348e 100644 --- a/generic/tclClock.c +++ b/generic/tclClock.c @@ -1810,7 +1810,7 @@ ClockMillisecondsObjCmd( return TCL_ERROR; } Tcl_GetTime(&now); - Tcl_SetObjResult(interp, Tcl_NewWideIntObj((Tcl_WideInt) + Tcl_SetObjResult(interp, Tcl_NewWideUIntObj((Tcl_WideUInt) now.sec * 1000 + now.usec / 1000)); return TCL_OK; } @@ -1998,7 +1998,7 @@ ClockSecondsObjCmd( return TCL_ERROR; } Tcl_GetTime(&now); - Tcl_SetObjResult(interp, Tcl_NewWideIntObj((Tcl_WideInt) now.sec)); + Tcl_SetObjResult(interp, Tcl_NewWideUIntObj(now.sec)); return TCL_OK; } |