Cannot upgrade TCL port

[Nagy László]

My system is FreeBSD 6.0. After running

portupgrade -aP

it start upgrading Tcl. After compilation, it starts making tests like 
the one below. Each test times out after some minutes. It would take a 
day to run all the tests. Why they are failing? How can I disable the 
tests? The main problem is that there are other packages depending on 
TCL, and portupgrade won't upgrade them because TCL fails to upgrade. 
Please help.

   Laszlo


fileName.test
fileSystem.test
for-old.test
for.test
foreach.test
format.test
get.test
history.test
http.test

==== http-3.3 http::geturl FAILED
==== Contents of test case:

    set token [http::geturl $url]
    http::data $token

---- Test generated error; Return code was: 1
---- Return code should have been one of: 0 2
---- errorInfo: couldn't open socket: connection timed out
    while executing
"http::geturl $url"
    invoked from within
"set token [http::geturl $url]"
    ("uplevel" body line 2)
    invoked from within
"uplevel 1 $script"
---- errorCode: NONE
==== http-3.3 FAILED

** Command failed [exit code 2]: /usr/bin/script -qa 
/tmp/portupgrade47538.0 env PORT_UPGRADE=yes make PORT_UPGRADE=yes
** Fix the problem and try again.