no need for string->immutable-string when creating exceptions
svn: r5372
original commit: 19c33a8e2a
This commit is contained in:
parent
3996eefb9a
commit
0237eb4442
|
@ -92,9 +92,8 @@
|
|||
port
|
||||
(lambda ()
|
||||
(raise (make-exn:fail:network
|
||||
(string->immutable-string
|
||||
(format "tcp-connect: connection to ~a, port ~a failed (nobody is listening)"
|
||||
hostname-string port))
|
||||
(format "tcp-connect: connection to ~a, port ~a failed (nobody is listening)"
|
||||
hostname-string port)
|
||||
(current-continuation-marks))))))
|
||||
(cons to-in to-out))
|
||||
(values from-in from-out))
|
||||
|
|
Loading…
Reference in New Issue
Block a user