original commit: 71b026d8e69ce6b44e0d9150c90f095ea6f2641e
This commit is contained in:
Robby Findler 2004-04-21 19:20:10 +00:00
parent a1d43601c2
commit 6b82080917

View File

@ -75,7 +75,7 @@
port-table
port
(lambda ()
(raise (make-exn:i/o:tcp
(raise (make-exn:fail:network
(format "tcp-connect: connection to ~a, port ~a failed (nobody is listening)"
hostname-string port)
(current-continuation-marks))))))