Hi,

> lang/scm                            espie@

This fixes the build of lang/scm. I don't see any reason why the
two functions should need sockaddr_in.

ok?

Ciao,
	Kili

Index: patches/patch-socket_c
===================================================================
RCS file: patches/patch-socket_c
diff -N patches/patch-socket_c
--- /dev/null	1 Jan 1970 00:00:00 -0000
+++ patches/patch-socket_c	8 Jun 2026 19:40:15 -0000
@@ -0,0 +1,24 @@
+Let it build with llvm 22.
+
+Index: socket.c
+
+--- socket.c.orig
++++ socket.c
+@@ -582,7 +582,7 @@ static char s_getpeername[] = "getpeername";
+ SCM l_getpeername(sockpt)
+      SCM sockpt;
+ {
+-  struct sockaddr_in sad;
++  struct sockaddr sad;
+   int sts, sadlen = sizeof(sad);
+   bzero((char *) &sad, sizeof(sad));
+   ASRTER(NIMP(sockpt) && OPFPORTP(sockpt), sockpt, ARG1, s_getpeername);
+@@ -596,7 +596,7 @@ static char s_getsockname[] = "getsockname";
+ SCM l_getsockname(sockpt)
+      SCM sockpt;
+ {
+-  struct sockaddr_in sad;
++  struct sockaddr sad;
+   int sts, sadlen = sizeof(sad);
+   bzero((char *) &sad, sizeof(sad));
+   ASRTER(NIMP(sockpt) && OPFPORTP(sockpt), sockpt, ARG1, s_getsockname);