diff options
author | Paul Traina <pst@FreeBSD.org> | 1997-11-27 19:49:05 +0000 |
---|---|---|
committer | Paul Traina <pst@FreeBSD.org> | 1997-11-27 19:49:05 +0000 |
commit | f25b19db8d50748d4f75272ae324cad27788d9b3 (patch) | |
tree | cef0bba69f1833802f43364a0cde6945601e665a /contrib/tcl/tests/socket.test | |
parent | 539e1e66ff6f99c987c8e03872ddaea5260db8f7 (diff) |
Notes
Diffstat (limited to 'contrib/tcl/tests/socket.test')
-rw-r--r-- | contrib/tcl/tests/socket.test | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/contrib/tcl/tests/socket.test b/contrib/tcl/tests/socket.test index 280db1ba5549..b2719de67b73 100644 --- a/contrib/tcl/tests/socket.test +++ b/contrib/tcl/tests/socket.test @@ -59,7 +59,7 @@ # listening at port 2048. If all fails, a message is printed and the tests # using the remote server are not performed. # -# SCCS: @(#) socket.test 1.82 97/08/05 13:30:55 +# SCCS: @(#) socket.test 1.83 97/09/15 16:29:47 if {[string compare test [info procs test]] == 1} then {source defs} @@ -402,7 +402,7 @@ test socket-2.5 {tcp connection with redundant server port} {stdio} { close $f set x } {ready hello} -test socket-2.6 {tcp connection} {unixOrPc} { +test socket-2.6 {tcp connection} {} { set status ok if {![catch {set sock [socket localhost 2828]}]} { if {![catch {gets $sock}]} { @@ -891,7 +891,7 @@ test socket-9.1 {testing spurious events} { close $s list $spurious $len } {0 50} -test socket-9.2 {testing async write, fileevents, flush on close} {tempNotMac} { +test socket-9.2 {testing async write, fileevents, flush on close} {} { set firstblock "" for {set i 0} {$i < 5} {incr i} {set firstblock "a$firstblock$firstblock"} set secondblock "" |