summaryrefslogtreecommitdiff
path: root/lang/qscheme/files/patch-process.c
diff options
context:
space:
mode:
authorDmitry Marakasov <amdmi3@FreeBSD.org>2009-04-01 22:31:31 +0000
committerDmitry Marakasov <amdmi3@FreeBSD.org>2009-04-01 22:31:31 +0000
commitf2bb29203cbb68f917b96c09b334257f80b63e10 (patch)
tree42a57a1560636bff450515434febabe35f0b756c /lang/qscheme/files/patch-process.c
parent- Update to 23.0 (diff)
- Fix build with gcc 4.2
PR: 132287 Submitted by: Vitaly Magerya <vmagerya at gmail dot com> Approved by: Erik Greenwald <erik dot greenwald at gmail dot com> (maintainer)
Notes
Notes: svn path=/head/; revision=231450
Diffstat (limited to 'lang/qscheme/files/patch-process.c')
-rw-r--r--lang/qscheme/files/patch-process.c20
1 files changed, 20 insertions, 0 deletions
diff --git a/lang/qscheme/files/patch-process.c b/lang/qscheme/files/patch-process.c
new file mode 100644
index 000000000000..ecd3728c03bd
--- /dev/null
+++ b/lang/qscheme/files/patch-process.c
@@ -0,0 +1,20 @@
+--- process.c.orig 2000-06-01 22:30:18.000000000 +0300
++++ process.c 2009-03-03 17:37:30.000000000 +0200
+@@ -38,6 +38,7 @@
+
+ #define SCM_PROCESS(x) ((SCM_ProcessAux*)SCM_AUX(x))
+ #define SCM_PROCESSP(x) (SCM_OBJTYPE(x) == SOBJ_T_PROCESS)
++#define SCM_PROCESS_SET SCM_AUX_SET
+
+ #define SCM_PROCESS_PID(x) (SCM_PROCESS(x)->pid)
+ #define SCM_PROCESS_PORT(x,i) (SCM_PROCESS(x)->port[i])
+@@ -153,7 +154,8 @@
+ int i;
+ SOBJ new = scm_newcell(SOBJ_T_PROCESS);
+
+- SCM_PROCESS(new) = scm_must_alloc(sizeof(SCM_ProcessAux));
++ /*SCM_PROCESS_SET(new) = scm_must_alloc(sizeof(SCM_ProcessAux));*/
++ SCM_PROCESS_SET(new, scm_must_alloc(sizeof(SCM_ProcessAux)));
+ SCM_PROCESS_PID(new) = 0;
+ for (i = 0; i < 3; i++)
+ SCM_PROCESS_PORT(new, i) = NULL;