Can't install tcl84

[Abdullah Al-Marrie]

Hello,

This is my server uname -a

FreeBSD sms.wearab.net 6.1-STABLE FreeBSD 6.1-STABLE #0: Wed Jun 28
19:25:02 UTC 2006

I can't install tcl84 from the ports I don't know why, has anyone
faced this problem too?

pkg.test
:       Total   139     Passed  138     Skipped 1       Failed  0
pkgMkIndex.test
platform.test
proc-old.test
proc.test
pwd.test
reg.test
regexp.test
regexpComp.test
registry.test
rename.test
resource.test
result.test
safe.test
scan.test
security.test
set-old.test
set.test
socket.test

==== socket-2.10 close on accept, accepted socket lives FAILED
==== Contents of test case:

    set done 0
    set timer [after 20000 "set done timed_out"]
    set ss [socket -server accept 0]
    proc accept {s a p} {
        global ss
        close $ss
        fileevent $s readable "readit $s"
        fconfigure $s -trans lf
    }
    proc readit {s} {
        global done
        gets $s
        close $s
        set done 1
    }
    set cs [socket [info hostname] [lindex [fconfigure $ss -sockname] 2]]
    puts $cs hello
    close $cs
    vwait done
    after cancel $timer
    set done

---- Test generated error; Return code was: 1
---- Return code should have been one of: 0 2
---- errorInfo: couldn't open socket: connection refused
    while executing
"socket [info hostname] [lindex [fconfigure $ss -sockname] 2]"
    invoked from within
"set cs [socket [info hostname] [lindex [fconfigure $ss -sockname] 2]]"
    ("uplevel" body line 17)
    invoked from within
"uplevel 1 $script"
---- errorCode: POSIX ECONNREFUSED {connection refused}
==== socket-2.10 FAILED


==== socket-5.1 byte order problems, socket numbers, htons FAILED
==== Contents of test case:

    set x {couldn't open socket: not owner}
    if {![catch {socket -server dodo 0x1} msg]} {
        set x {htons problem, should be disallowed, are you running as SU?}
        close $msg
    }
    set x

---- Result was:
htons problem, should be disallowed, are you running as SU?
---- Result should have been (exact matching):
couldn't open socket: not owner
==== socket-5.1 FAILED


==== socket-5.3 byte order problems, socket numbers, htons FAILED
==== Contents of test case:

    set x {couldn't open socket: not owner}
    if {![catch {socket -server dodo 21} msg]} {
        set x {htons problem, should be disallowed, are you running as SU?}
        close $msg
    }
    set x

---- Result was:
htons problem, should be disallowed, are you running as SU?
---- Result should have been (exact matching):
couldn't open socket: not owner
==== socket-5.3 FAILED


==== socket-7.4 testing socket specific options FAILED
==== Contents of test case:

    set s [socket -server accept 0]
    proc accept {s a p} {
        global x
        set x [fconfigure $s -sockname]
        close $s
    }
    set listen [lindex [fconfigure $s -sockname] 2]
    set s1 [socket [info hostname] $listen]
    set timer [after 10000 "set x timed_out"]
    vwait x
    after cancel $timer
    close $s
    close $s1
    set l ""
    lappend l [expr {[lindex $x 2] == $listen}] [llength $x]

---- Test generated error; Return code was: 1
---- Return code should have been one of: 0 2
---- errorInfo: couldn't open socket: connection refused
    while executing
"socket [info hostname] $listen"
    invoked from within
"set s1 [socket [info hostname] $listen]"
    ("uplevel" body line 9)
    invoked from within
"uplevel 1 $script"
---- errorCode: POSIX ECONNREFUSED {connection refused}
==== socket-7.4 FAILED

-- 
Regards,

-Abdullah Ibn Hamad Al-Marri
Arab Portal
http://www.WeArab.Net/