From 15d7c439df689d838d98d861812b7045ecb5f25d Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Thu, 26 Dec 2019 05:02:33 -0600 Subject: [PATCH] fix name on port sent through place channel --- racket/src/racket/src/place.c | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/racket/src/racket/src/place.c b/racket/src/racket/src/place.c index 52782328e9..a64c975c3e 100644 --- a/racket/src/racket/src/place.c +++ b/racket/src/racket/src/place.c @@ -1247,6 +1247,8 @@ static Scheme_Object *shallow_types_copy(Scheme_Object *so, Scheme_Hash_Table *h rktio_fd_t *fd; name = ((Scheme_Serialized_Socket_FD *) so)->name; + name = shallow_types_copy(name, NULL, fd_accumulators, delayed_err, delayed_errno, delayed_errkind, + mode, can_raise_exn, master_chain, invalid_object); fd = rktio_fd_attach(scheme_rktio, fdt); /* scheme_socket_to_ports(fd, "tcp-accepted", 1, &in, &out); */ @@ -1282,6 +1284,9 @@ static Scheme_Object *shallow_types_copy(Scheme_Object *so, Scheme_Hash_Table *h name = ffd->name; type = ffd->type; + name = shallow_types_copy(name, NULL, fd_accumulators, delayed_err, delayed_errno, delayed_errkind, + mode, can_raise_exn, master_chain, invalid_object); + if (type == scheme_input_port_type) { new_so = scheme_make_rktio_fd_input_port(fd, name); }