Before calling Tcl_ExitThread() in a multi-threaded test, call Tcl_DoOneEvent() as many times as necessary to handle any queued events.

FossilOrigin-Name: b3399b40785d13754979203f15d71c95fec50282
This commit is contained in:
dan 2010-07-06 10:55:44 +00:00
parent 9e55d47d33
commit e1a2a990b8
3 changed files with 9 additions and 18 deletions

View File

@ -1,8 +1,5 @@
-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1
C Reorder\svariable\sdeclarations\sin\sthe\sprevious\scheck-in\sto\savoid\sputting\scode\nbefore\sdeclarations\swhen\snot\stesting.
D 2010-07-06T09:29:01
C Before\scalling\sTcl_ExitThread()\sin\sa\smulti-threaded\stest,\scall\sTcl_DoOneEvent()\sas\smany\stimes\sas\snecessary\sto\shandle\sany\squeued\sevents.
D 2010-07-06T10:55:45
F Makefile.arm-wince-mingw32ce-gcc fcd5e9cd67fe88836360bb4f9ef4cb7f8e2fb5a0
F Makefile.in a5cad1f8f3e021356bfcc6c77dc16f6f1952bbc3
F Makefile.linux-gcc d53183f4aa6a9192d249731c90dbdffbd2c68654
@ -211,7 +208,7 @@ F src/test_pcache.c 7bf828972ac0d2403f5cfa4cd14da41f8ebe73d8
F src/test_schema.c 8c06ef9ddb240c7a0fcd31bc221a6a2aade58bf0
F src/test_server.c bbba05c144b5fc4b52ff650a4328027b3fa5fcc6
F src/test_tclvar.c f4dc67d5f780707210d6bb0eb6016a431c04c7fa
F src/test_thread.c 9fe4226a4b6681ed2c58e23ee576106110f8f20f
F src/test_thread.c bedd05cad673dba53326f3aa468cc803038896c0
F src/test_vfs.c bea0f0bdee9b033a62d057bf3451c25760b0414d
F src/test_wsd.c 41cadfd9d97fe8e3e4e44f61a4a8ccd6f7ca8fe9
F src/tokenize.c 25ceb0f0a746ea1d0f9553787f3f0a56853cfaeb
@ -833,14 +830,7 @@ F tool/speedtest2.tcl ee2149167303ba8e95af97873c575c3e0fab58ff
F tool/speedtest8.c 2902c46588c40b55661e471d7a86e4dd71a18224
F tool/speedtest8inst1.c 293327bc76823f473684d589a8160bde1f52c14e
F tool/vdbe-compress.tcl d70ea6d8a19e3571d7ab8c9b75cba86d1173ff0f
P c272196115ab3926e56b6f4183ec127e3f98ef9c
R 36e64364c33ae6390aff87796680a1ef
U drh
Z 359e841bb322bbf1a5d2b9a34fa1d68c
-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.6 (GNU/Linux)
iD8DBQFMMvdgoxKgR168RlERAp97AJ9cZOsVDpKBxw2XQPV7Cn6BDfbBuQCbB6lc
4+IvblymbnuQ9fk+WLoyA64=
=QJu1
-----END PGP SIGNATURE-----
P d1fe8ab4a176180053d35300ad0540a27c6cd76d
R 97bfdc0a377f0ce957229d33641b4877
U dan
Z 92b8b5bd1d6ad0f0b2c665129cd5c9e9

View File

@ -1 +1 @@
d1fe8ab4a176180053d35300ad0540a27c6cd76d
b3399b40785d13754979203f15d71c95fec50282

View File

@ -150,6 +150,7 @@ static Tcl_ThreadCreateType tclScriptThread(ClientData pSqlThread){
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;
}