gc bugs: more instances of wrong mutations.

* socket.c (dgram_set_sock_peer): Assign to struct
dgram_stream using using set macro.

* stream.c (stdio_set_sock_peer): Assign to struct
stdio_handle peer using set macro.

1 files changed, 1 insertions, 1 deletions

diff --git a/stream.c b/stream.c
index bca44769..90fbae8e 100644
--- a/stream.c
+++ b/stream.c
@@ -770,7 +770,7 @@ static val stdio_get_sock_peer(val stream)
 static val stdio_set_sock_peer(val stream, val peer)
 {
   struct stdio_handle *h = coerce(struct stdio_handle *, stream->co.handle);
-  return h->peer = peer;
+  return set(mkloc(h->peer, stream), peer);
 }
 
 #endif