summaryrefslogtreecommitdiff
path: root/lang/qscheme/files/patch-socket.c
diff options
context:
space:
mode:
authorRene Ladan <rene@FreeBSD.org>2024-04-10 21:11:35 +0200
committerRene Ladan <rene@FreeBSD.org>2024-04-10 21:12:09 +0200
commit820bb223f0f2e0239ea6e1719161c76f0d1ad7ca (patch)
tree4d936bd8a70dfd8febd1cf9dc12151fa5e8992a1 /lang/qscheme/files/patch-socket.c
parentMk/Scripts/do-users-groups.sh: Make message endings consistent (cleanup) (diff)
lang/qscheme: Remove expired port
2024-04-10 lang/qscheme: Unmaintained and there are more modern alternatives
Diffstat (limited to 'lang/qscheme/files/patch-socket.c')
-rw-r--r--lang/qscheme/files/patch-socket.c30
1 files changed, 0 insertions, 30 deletions
diff --git a/lang/qscheme/files/patch-socket.c b/lang/qscheme/files/patch-socket.c
deleted file mode 100644
index b6c7efd92c92..000000000000
--- a/lang/qscheme/files/patch-socket.c
+++ /dev/null
@@ -1,30 +0,0 @@
---- socket.c.orig 2009-03-03 18:05:10.000000000 +0200
-+++ socket.c 2009-03-03 18:07:34.000000000 +0200
-@@ -25,6 +25,7 @@
-
- #define SCM_SOCKETP(x) (SCM_OBJTYPE(x) == SOBJ_T_SOCKET)
- #define SCM_SOCKET(x) ((SCM_SocketAux*)SCM_AUX(x))
-+#define SCM_SOCKET_SET SCM_AUX_SET
-
- /* report system error */
- static void system_error(char *msg)
-@@ -39,7 +40,8 @@
- {
- SOBJ new;
- new = scm_newcell(SOBJ_T_SOCKET);
-- SCM_SOCKET(new) = scm_must_alloc(sizeof(SCM_SocketAux));
-+ /*SCM_SOCKET(new) = scm_must_alloc(sizeof(SCM_SocketAux));*/
-+ SCM_SOCKET_SET(new, scm_must_alloc(sizeof(SCM_SocketAux)));
- memset(SCM_SOCKET(new), 0, sizeof(SCM_SocketAux));
- return(new);
- }
-@@ -323,7 +325,8 @@
- /* scm_puts("; sweeping socket "); scm_cprint(x); */
- scm_socket_shutdown2(x, 1);
- scm_free(SCM_SOCKET(x));
-- SCM_SOCKET(x) = NULL;
-+ /*SCM_SOCKET(x) = NULL;*/
-+ SCM_SOCKET_SET(x, NULL);
- }
- }
-