Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | add selected tcl upstream changes |
---|---|
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
83c841b3cdeb2671e651fcaae64c9845 |
User & Date: | chw 2019-07-12 04:31:27.147 |
Context
2019-07-12
| ||
09:02 | add optional asciimath package to TSB check-in: c3a5dab823 user: chw tags: trunk | |
04:31 | add selected tcl upstream changes check-in: 83c841b3cd user: chw tags: trunk | |
04:20 | add tk upstream changes check-in: bc74183392 user: chw tags: trunk | |
Changes
Changes to jni/tcl/generic/tclCmdAH.c.
︙ | ︙ | |||
1388 1389 1390 1391 1392 1393 1394 | "could not get access time for file \"%s\"", TclGetString(objv[1]))); return TCL_ERROR; } #endif if (objc == 3) { | < < < < < | | | 1388 1389 1390 1391 1392 1393 1394 1395 1396 1397 1398 1399 1400 1401 1402 1403 1404 | "could not get access time for file \"%s\"", TclGetString(objv[1]))); return TCL_ERROR; } #endif if (objc == 3) { Tcl_WideInt newTime; if (Tcl_GetWideIntFromObj(interp, objv[2], &newTime) != TCL_OK) { return TCL_ERROR; } tval.actime = newTime; tval.modtime = Tcl_GetModificationTimeFromStat(&buf); if (Tcl_FSUtime(objv[1], &tval) != 0) { |
︙ | ︙ | |||
1474 1475 1476 1477 1478 1479 1480 | #endif if (objc == 3) { /* * Need separate variable for reading longs from an object on 64-bit * platforms. [Bug 698146] */ | | | | 1469 1470 1471 1472 1473 1474 1475 1476 1477 1478 1479 1480 1481 1482 1483 1484 1485 | #endif if (objc == 3) { /* * Need separate variable for reading longs from an object on 64-bit * platforms. [Bug 698146] */ Tcl_WideInt newTime; if (Tcl_GetWideIntFromObj(interp, objv[2], &newTime) != TCL_OK) { return TCL_ERROR; } tval.actime = Tcl_GetAccessTimeFromStat(&buf); tval.modtime = newTime; if (Tcl_FSUtime(objv[1], &tval) != 0) { |
︙ | ︙ |