Report forwarded to Darren Stalder <torin@daft.com>:
Bug#8589; Package perl.
Darren Stalder <torin@daft.com>
Sorry, this message was lost when this bug report was restored from a backup.
Acknowledgement sent to Vincent Renardias <vincent@waw.com>:
New bug report received and forwarded. Copy sent to Darren Stalder <torin@daft.com>.
Vincent Renardias <vincent@waw.com>
Sorry, this message was lost when this bug report was restored from a backup.
Received: (at maintonly) by bugs.debian.org; 7 Apr 1997 17:40:14 +0000
Received: (qmail 30763 invoked from network); 7 Apr 1997 17:40:12 -0000
Received: from ns1.waw.com (HELO odin.waw.com) (vincent@194.51.88.250)
by master.debian.org with SMTP; 7 Apr 1997 17:40:10 -0000
Received: (from vincent@localhost) by odin.waw.com (8.7.3/8.7.3/waw) id TAA13009; Mon, 7 Apr 1997 19:41:42 +0100
Date: Mon, 7 Apr 1997 19:41:42 +0100 (GMT+0100)
From: Vincent Renardias
To: maintonly@bugs.debian.org
Subject: A glibc patch for perl 5.003 (fwd)
Message-ID:
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII
Package: perl
Version: 5.003
--
- ** Linux ** +-------------------+ ** WAW ** -
- vincent@debian.org | RENARDIAS Vincent | vincent@waw.com -
- Debian/GNU Linux +-------------------+ http://www.waw.com/ -
- http://www.debian.org/ | WAW (33) 4 91 81 21 45 -
- | Luminy (33) 4 91 82 85 32 -
---------------------------------------------------------------------------
---------- Forwarded message ----------
Date: Sun, 6 Apr 1997 13:59:17 -0700 (PDT)
From: H.J. Lu
To: debian
Subject: A glibc patch for perl 5.003
Here is a glibc patch for perl 5.003.
H.J.
----
--- doio.c.orig Tue Feb 27 13:29:23 1996
+++ doio.c Sun Apr 6 12:54:02 1997
@@ -1361,7 +1361,11 @@
else if (cmd == GETALL || cmd == SETALL)
{
struct semid_ds semds;
+#if __GNU_LIBRARY__ > 1
+ if (semctl(id, 0, IPC_STAT, (union semun) &semds) == -1)
+#else
if (semctl(id, 0, IPC_STAT, &semds) == -1)
+#endif
return -1;
getinfo = (cmd == GETALL);
infosize = semds.sem_nsems * sizeof(short);
@@ -1407,7 +1411,11 @@
#endif
#ifdef HAS_SEM
case OP_SEMCTL:
+#if __GNU_LIBRARY__ > 1
+ ret = semctl(id, n, cmd, (union semun) ((struct semid_ds *)a));
+#else
ret = semctl(id, n, cmd, (struct semid_ds *)a);
+#endif
break;
#endif
#ifdef HAS_SHM