Posted to tcl by steveb at Thu Oct 18 16:00:20 GMT 2012view pretty
http://pubs.opengroup.org/onlinepubs/009695399/ if {$Url(thread,$prefix)} { Count UrlToThread Thread_Dispatch $sock \ [concat $Url(command,$prefix) [list $sock $suffix]] } else { Count UrlEval eval $Url(command,$prefix) [list $sock $suffix] } } error] == 1} {