Tcl package Thread source code

Artifact [82ae3a98f9]
Login

Artifact 82ae3a98f92c02403f36a16a6fd66447ad3b275e23360a066b6f9325bf49d0ac:

Ticket change [82ae3a98f9] - New ticket [76f47e0376] thread::send -async script varname aborts with "alloc: invalid block". by pooryorick 2018-07-17 06:15:10.
D 2018-07-17T06:15:10.861
J assignee nobody
J closer nobody
J cmimetype text/x-fossil-wiki
J comment With\sa\sTcl\scompiled\swith\s<code>--enable-symbols</code>\s,\sthe\sscript\r\n\r\n\r\n<code><verbatim>\r\npackage\srequire\sThread\r\nset\st1\s[thread::create]\r\nthread::send\s-async\s$t1\s{lindex\s{}}\s[expr\s0]\r\n</verbatim></code>\r\n\r\nresults\sin:\r\n\r\n\r\n<code><verbatim>\r\nalloc:\sinvalid\sblock\r\n</verbatim></code>\r\n\r\n\r\nThis\shappens\sbecause\s<code>threadSendFree</code>\r\n[https://core.tcl.tk/thread/artifact?udc=1&ln=992&name=27b80f574a4ced5a|\r\nobtains\sthe\slength]\sof\sa\s<code>Tcl_Obj</code>\sbefore\sthe\sstring\srepresentation\r\nfor\sthat\sobject\sis\sgenerated,\sand\sa\sfew\slines\slater\r\n[https://core.tcl.tk/thread/artifact?udc=1&ln=1014&name=27b80f574a4ced5a|the\r\nstring\srepresentation\sis\sgenerated].
J foundin trunk1
J is_private 0
J login pooryorick
J priority 5\sMedium
J resolution None
J severity Minor
J status Open
J submitter pooryorick
J subsystem 80.\sThread\sPackage
J title thread::send\s-async\sscript\svarname\saborts\swith\s"alloc:\sinvalid\sblock"
J type Bug
K 76f47e0376fb8b2783627799fd7f2adab66d98f9
U pooryorick
Z c3b1f1cbb536ec78d33e591841304e45