Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Silence warnings. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | core-8-5-branch |
| Files: | files | file ages | folders |
| SHA1: |
af91d8f029061454335d9bda285f3006 |
| User & Date: | dgp 2011-11-01 14:10:30 |
Context
|
2011-11-01
| ||
| 14:14 | silence more warnings check-in: 04e72dd1dc user: dgp tags: core-8-5-branch | |
| 14:10 | Silence warnings. check-in: af91d8f029 user: dgp tags: core-8-5-branch | |
|
2011-10-31
| ||
| 17:06 | 3414754 Fix the PATHFLAGS != 0 intrep normalizing trailing slashes. check-in: 594e384786 user: dgp tags: core-8-5-branch | |
Changes
Changes to generic/tclTest.c.
| ︙ | ︙ | |||
864 865 866 867 868 869 870 |
return TCL_ERROR;
}
for (asyncPtr = firstHandler; asyncPtr != NULL;
asyncPtr = asyncPtr->nextPtr) {
if (asyncPtr->id == id) {
Tcl_ThreadId threadID;
if (Tcl_CreateThread(&threadID, AsyncThreadProc,
| | | 864 865 866 867 868 869 870 871 872 873 874 875 876 877 878 |
return TCL_ERROR;
}
for (asyncPtr = firstHandler; asyncPtr != NULL;
asyncPtr = asyncPtr->nextPtr) {
if (asyncPtr->id == id) {
Tcl_ThreadId threadID;
if (Tcl_CreateThread(&threadID, AsyncThreadProc,
(ClientData) INT2PTR(id), TCL_THREAD_STACK_DEFAULT,
TCL_THREAD_NOFLAGS) != TCL_OK) {
Tcl_SetResult(interp, "can't create thread", TCL_STATIC);
return TCL_ERROR;
}
break;
}
}
|
| ︙ | ︙ | |||
952 953 954 955 956 957 958 |
#ifdef TCL_THREADS
static Tcl_ThreadCreateType
AsyncThreadProc(
ClientData clientData) /* Parameter is the id of a
* TestAsyncHandler, defined above. */
{
TestAsyncHandler *asyncPtr;
| | | 952 953 954 955 956 957 958 959 960 961 962 963 964 965 966 |
#ifdef TCL_THREADS
static Tcl_ThreadCreateType
AsyncThreadProc(
ClientData clientData) /* Parameter is the id of a
* TestAsyncHandler, defined above. */
{
TestAsyncHandler *asyncPtr;
int id = PTR2INT(clientData);
Tcl_Sleep(1);
Tcl_MutexLock(&asyncTestMutex);
for (asyncPtr = firstHandler; asyncPtr != NULL;
asyncPtr = asyncPtr->nextPtr) {
if (asyncPtr->id == id) {
Tcl_AsyncMark(asyncPtr->handler);
|
| ︙ | ︙ |