Tcl Source Code

Artifact [2af10e6704]
Login

Artifact 2af10e6704f07476d80ca5b08bd9479fa321f6f5:

Ticket change [2af10e6704] - New ticket [3001677f64] TCL fails on Check phase (test failure: socket_inet-13.1: Testing use of shared socket between two threads FAILED). by oehhar 2017-02-23 08:47:37.
D 2017-02-23T08:47:37.812
J assignee nobody
J closer nobody
J cmimetype text/plain
J comment Hello,\r\nI´m\strying\sto\sbuild\s'tcl'\sversion\s8.6.4\son\sGNU/Hurd\ssystem\sthrough\sGuix\spackage\smanager,\sin\sthe\s'Check'\sphase\sstops.\r\n\r\nAny\sideas\sabout\swhat's\sgoing\son?\r\n\r\n/------------------------------------------------/\r\nsocket.test\r\n\r\n\r\n====\ssocket_inet-13.1\sTesting\suse\sof\sshared\ssocket\sbetween\stwo\sthreads\sFAILED\r\n====\sContents\sof\stest\scase:\r\n\r\n\s\s\s\s#\screate\sa\sthread\r\n\s\s\s\sset\sserverthread\s[thread::create\s-preserved\s[string\smap\s[list\s@localhost@\s$localhost]\s{\r\n\s\s\s\s\s\s\s\sset\sf\s[socket\s-server\saccept\s-myaddr\s@localhost@\s0]\r\n\s\s\s\s\s\s\s\sset\slisten\s[lindex\s[fconfigure\s$f\s-sockname]\s2]\r\n\s\s\s\s\s\s\s\sproc\saccept\s{s\sa\sp}\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\sfileevent\s$s\sreadable\s[list\secho\s$s]\r\n\s\s\s\s\s\s\s\s\s\s\s\sfconfigure\s$s\s-buffering\sline\r\n\s\s\s\s\s\s\s\s}\r\n\s\s\s\s\s\s\s\sproc\secho\s{s}\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\s\sglobal\si\r\n\s\s\s\s\s\s\s\s\s\s\s\s\sset\sl\s[gets\s$s]\r\n\s\s\s\s\s\s\s\s\s\s\s\s\sif\s{[eof\s$s]}\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\sglobal\sx\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\sclose\s$s\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\sset\sx\sdone\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s}\selse\s{\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\sincr\si\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\s\sputs\s$s\s$l\r\n\s\s\s\s\s\s\s\s\s\s\s\s\s}\r\n\s\s\s\s\s\s\s\s}\r\n\s\s\s\s\s\s\s\sset\si\s0\r\n\s\s\s\s\s\s\s\svwait\sx\r\n\s\s\s\s\s\s\s\sclose\s$f\r\n\s\s\s\s}]]\r\n\s\s\s\sset\sport\s[thread::send\s$serverthread\s{set\slisten}]\r\n\s\s\s\sset\ss\s[socket\s$localhost\s$port]\r\n\s\s\s\sfconfigure\s$s\s-buffering\sline\r\n\s\s\s\scatch\s{\r\n\s\s\s\s\s\s\s\sputs\s$s\s"hello"\r\n\s\s\s\s\s\s\s\sgets\s$s\sresult\r\n\s\s\s\s}\r\n\s\s\s\sclose\s$s\r\n\s\s\s\sthread::release\s$serverthread\r\n\s\s\s\sappend\sresult\s"\s"\s[llength\s[thread::names]]\r\n\r\n----\sTest\sgenerated\serror;\sReturn\scode\swas:\s1\r\n----\sReturn\scode\sshould\shave\sbeen\sone\sof:\s0\s2\r\n----\serrorInfo:\sthread\s"tid0x4"\sdoes\snot\sexist\r\n\s\s\s\swhile\sexecuting\r\n"thread::release\s$serverthread"\r\n\s\s\s\s("uplevel"\sbody\sline\s34)\r\n\s\s\s\sinvoked\sfrom\swithin\r\n"uplevel\s1\s$script"\r\n----\serrorCode:\sNONE\r\n====\ssocket_inet-13.1\sFAILED\r\n\r\n\r\n\r\n====\ssocket_inet6-3.1\ssocket\sconflict\sFAILED\r\n====\sContents\sof\stest\scase:\r\n\r\n\s\s\s\ssocket\s-server\saccept\s-myaddr\s$localhost\s$listen\r\n\r\n----\sTest\scompleted\snormally;\sReturn\scode\swas:\s0\r\n----\sReturn\scode\sshould\shave\sbeen\sone\sof:\s1\r\n====\ssocket_inet6-3.1\sFAILED\r\n\r\n\r\n\r\n====\ssocket_inet6-11.6\ssocket\sconflict\sFAILED\r\n====\sContents\sof\stest\scase:\r\n\r\n\s\s\s\sset\ss2\s[socket\s-server\saccept\s-myaddr\s$localhost\s[getPort\s$s1]]\r\n\s\s\s\slist\s[getPort\s$s2]\s[close\s$s2]\r\n\r\n----\sTest\scompleted\snormally;\sReturn\scode\swas:\s0\r\n----\sReturn\scode\sshould\shave\sbeen\sone\sof:\s1\r\n====\ssocket_inet6-11.6\sFAILED\r\n\r\n/------------------------------------------------/
J foundin 8.6.4
J is_private 0
J login oehhar
J priority 5\sMedium
J private_contact 8b728b1ce21a6d0be943cb159bff676e76a31c9a
J resolution None
J severity Minor
J status Open
J submitter oehhar
J subsystem 25.\sChannel\sSystem
J title TCL\sfails\son\sCheck\sphase\s(test\sfailure:\ssocket_inet-13.1:\sTesting\suse\sof\sshared\ssocket\sbetween\stwo\sthreads\sFAILED)
J type Bug
K 3001677f646fbff8637c82c9932954ce5d497234
U oehhar
Z 39e63794539010762fd600407b03eb82