summaryrefslogtreecommitdiff
path: root/lang/qscheme/files/patch-socket.c
diff options
context:
space:
mode:
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);
- }
- }
-