Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Before calling Tcl_ExitThread() in a multi-threaded test, call Tcl_DoOneEvent() as many times as necessary to handle any queued events. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
b3399b40785d13754979203f15d71c95 |
| User & Date: | dan 2010-07-06 10:55:45 |
Context
|
2010-07-06
| ||
| 11:26 | Do not do the *-closeallfiles test for notify2.test. It uses multiple threads. check-in: fb09152d user: dan tags: trunk | |
| 10:55 | Before calling Tcl_ExitThread() in a multi-threaded test, call Tcl_DoOneEvent() as many times as necessary to handle any queued events. check-in: b3399b40 user: dan tags: trunk | |
| 09:29 | Reorder variable declarations in the previous check-in to avoid putting code before declarations when not testing. check-in: d1fe8ab4 user: drh tags: trunk | |
Changes
Changes to src/test_thread.c.
146 147 148 149 150 151 152 153 154 155 156 157 158 159 |
Tcl_ListObjAppendElement(interp, pList, pRes); postToParent(p, pList); ckfree((void *)p); Tcl_DecrRefCount(pList); Tcl_DecrRefCount(pRes); Tcl_DeleteInterp(interp); Tcl_ExitThread(0); TCL_THREAD_CREATE_RETURN; } /* ** sqlthread spawn VARNAME SCRIPT ** |
> |
146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 |
Tcl_ListObjAppendElement(interp, pList, pRes);
postToParent(p, pList);
ckfree((void *)p);
Tcl_DecrRefCount(pList);
Tcl_DecrRefCount(pRes);
Tcl_DeleteInterp(interp);
while( Tcl_DoOneEvent(TCL_ALL_EVENTS|TCL_DONT_WAIT) );
Tcl_ExitThread(0);
TCL_THREAD_CREATE_RETURN;
}
/*
** sqlthread spawn VARNAME SCRIPT
**
|