From e5d73d7778736a8bd9f7f44aad5289ad2c783a16 Mon Sep 17 00:00:00 2001 From: Larry Wall Date: Fri, 19 Oct 1990 13:31:07 +0000 Subject: perl 3.0 patch #37 (combined patch) I tried to take the strlen of an integer on systems without wait4() or waitpid(). For some reason this didn't work too well... In hash.c there was a call to dbm_nextkey() which needed to be ifdefed on old dbm systems. A pattern such as /foo.*bar$/ was wrongly optimized to do tail matching on "foo". This was a longstanding bug that was unmasked by patch 36. Some systems have some SYS V IPC but not all of it. Configure now figures this out. Patch 36 put the user's PATH in front of Configures, but to make it work right I needed to change all calls of loc to ./loc in Configure. $cryptlib needed to be mentioned in the Makefile. Apollo 10.3 and Sun 3.5 have some compilation problems, so I mentioned them in README. Cray has weird restrictions on setjmp locations--you can't say if (result = setjmp(...)) Random typos and cleanup. --- eg/sysvipc/ipcshm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'eg') diff --git a/eg/sysvipc/ipcshm b/eg/sysvipc/ipcshm index 70588ff865..d40e46b945 100644 --- a/eg/sysvipc/ipcshm +++ b/eg/sysvipc/ipcshm @@ -13,8 +13,8 @@ $send = ($mode eq "s"); $SIZE = 32; $id = shmget(0x1234, $SIZE, ($send ? 0 : &IPC_CREAT) | 0644); -die "Can't get message queue: $!\n" unless defined($id); -print "message queue id: $id\n"; +die "Can't get shared memory: $!\n" unless defined($id); +print "shared memory id: $id\n"; if ($send) { while () { -- cgit v1.2.1