diff options
| -rw-r--r-- | hints/irix_6.sh | 5 | ||||
| -rw-r--r-- | hints/solaris_2.sh | 4 | ||||
| -rw-r--r-- | pod/perl.pod | 151 | ||||
| -rw-r--r-- | pod/perlfunc.pod | 16 | ||||
| -rwxr-xr-x | t/lib/ipc_sysv.t | 15 |
5 files changed, 125 insertions, 66 deletions
diff --git a/hints/irix_6.sh b/hints/irix_6.sh index 5e36c31cf2..6119c0d282 100644 --- a/hints/irix_6.sh +++ b/hints/irix_6.sh @@ -207,9 +207,8 @@ esac # Don't groan about unused libraries. ldflags="$ldflags -Wl,-woff,84" -case "`uname -s`-`$cc -version 2>&1`" in -IRIX64-*7.2.*) -op_cflags='optimize=-O1' ;; # workaround for an optimizer bug +case "`$cc -version 2>&1`" in +*7.2.*) op_cflags='optimize=-O1' ;; # workaround for an optimizer bug esac # We don't want these libraries. diff --git a/hints/solaris_2.sh b/hints/solaris_2.sh index e3b9ee02b3..5a8cbfab8b 100644 --- a/hints/solaris_2.sh +++ b/hints/solaris_2.sh @@ -395,7 +395,9 @@ EOM if test -n "$workshoplibs"; then loclibpth=`echo $loclibpth | sed -e "s% $workshoplibs%%" ` for lib in $workshoplibs; do - loclibpth="$loclibpth $lib/sparcv9" + # Logically, it should be sparcv9. + # But the reality fights back, it's v9. + loclibpth="$loclibpth $lib/sparcv9 $lib/v9" done loclibpth="$loclibpth $workshoplibs" fi diff --git a/pod/perl.pod b/pod/perl.pod index 7e940adae0..662dccfdbc 100644 --- a/pod/perl.pod +++ b/pod/perl.pod @@ -224,52 +224,120 @@ Okay, that's I<definitely> enough hype. Perl is available for most operating systems, including virtually all Unix-like platforms. -As of May 1999, the following platforms are able to build Perl -from the standard source code distribution available at -http://www.perl.com/CPAN/src/index.html - - AIX Linux SCO ODT/OSR - A/UX MachTen Solaris - BeOS MPE/iX SunOS - BSD/OS NetBSD SVR4 - DG/UX NextSTEP Tru64 UNIX 3) - DomainOS OpenBSD Ultrix - DOS DJGPP 1) OpenSTEP UNICOS - DYNIX/ptx OS/2 VMS - FreeBSD OS390 2) VOS - HP-UX PowerMAX Windows 3.1 1) - Hurd QNX Windows 95 1) 4) - IRIX Windows 98 1) 4) - Windows NT 1) 4) +As of early March 2000 (the Perl release 5.6.0), the following +platforms are able to build Perl from the standard source code +distribution available at http://www.perl.com/CPAN/src/index.html + + AIX + DOS DJGPP 1) + FreeBSD + HP-UX + IRIX + Linux + MachTen + MPE/iX + NetBSD + OpenBSD + OS/2 + Rhapsody/Darwin 2) + Solaris + Tru64 UNIX 3) + UNICOS + UNICOS/mk + VMS + VOS + Windows 3.1 1) + Windows 95 1) 4) + Windows 98 1) 4) + Windows NT 1) 4) 1) in DOS mode either the DOS or OS/2 ports can be used - 2) formerly known as MVS - 3) formerly known as Digital UNIX and before that DEC OSF/1 + 2) NEW in 5.6.0: the BSD/NeXT-based UNIX of Mac OS X + 3) formerly known as Digital UNIX and before that DEC OSF/1 4) compilers: Borland, Cygwin, Mingw32 EGCS/GCC, VC++ -The following platforms have been known to build Perl from source, -but we haven't been able to verify their status for the current release, -either because the hardware/software platforms are rare or -because we don't have an active champion on these platforms--or both. - - 3b1 FPS Plan 9 - AmigaOS GENIX PowerUX - ConvexOS Greenhills RISC/os - CX/UX ISC Stellar - DC/OSx MachTen 68k SVR2 - DDE SMES MiNT TI1500 - DOS EMX MPC TitanOS - Dynix NEWS-OS UNICOS/mk - EP/IX Opus Unisys Dynix - ESIX Unixware - -Support for the following platforms is planned for the next major -Perl release. - - BS2000 +The following platforms worked for the previous major release, +5.005_04 being the latest (as of March 2000) maintenance release, but +we didn't manage to test these in time for the 5.6.0 release of Perl. +There is a very good chance that these will work just fine with 5.6.0. + + A/UX + BeOS + BSD/OS + DG/UX + DYNIX/ptx + DomainOS + Hurd + NextSTEP + OpenSTEP + PowerMAX + QNX + SCO ODT/OSR + SunOS + SVR4 + Ultrix + +The following platform worked for the previous major release, 5.005_04 +being the latest (as of early March 2000) maintenance release of that, +but unfortunately the Unicode changes in 5.6.0 broke the port. This +will be fixed in a future Perl release. + + OS390 1) + + 1) Previously known as MVS, or OpenEdition MVS. + +Strongly related to the OS390 platform by also being EBCDIC-based +mainframe platforms are the + + BS2000 + VM/ESA + +platforms. They are related by not working in 5.6.0, unfortunately. +Contact the mailing list perl-mvs@perl.org for more details. + +MacOS (Classic, pre-X) is kind of 5.6.0-ready: building from the +source does work with the 5.6.0, but you need more than just the Perl +5.6 source code. Contact the mailing list macperl-porters@macperl.org +for more more information. + +The following platforms have been known to build Perl from source in +the past, but we haven't been able to verify their status for the +current release, either because the hardware/software platforms are +rare or because we don't have an active champion on these +platforms--or both. + + 3b1 + AmigaOS + ConvexOS + CX/UX + DC/OSx + DDE SMES + DOS EMX + Dynix + EP/IX + ESIX + FPS + GENIX + Greenhills + ISC + MachTen 68k + MiNT + MPC + NEWS-OS + Opus + Plan 9 + PowerUX + RISC/os + Stellar + SVR2 + TI1500 + TitanOS + Unisys Dynix + Unixware + +Support for the following platform is planned for a future Perl release. + Netware - Rhapsody - VM/ESA The following platforms have their own source code distributions and binaries available via http://www.perl.com/CPAN/ports/index.html. @@ -277,7 +345,6 @@ binaries available via http://www.perl.com/CPAN/ports/index.html. Perl release AS/400 5.003 - MacOS 5.004 Netware 5.003_07 Tandem Guardian 5.004 diff --git a/pod/perlfunc.pod b/pod/perlfunc.pod index 081709a174..758b573374 100644 --- a/pod/perlfunc.pod +++ b/pod/perlfunc.pod @@ -2462,10 +2462,10 @@ and C<IPC::Msg> documentation. =item msgsnd ID,MSG,FLAGS Calls the System V IPC function msgsnd to send the message MSG to the -message queue ID. MSG must begin with the long integer message type, -which may be created with C<pack("l", $type)>. Returns true if -successful, or false if there is an error. See also C<IPC::SysV> -and C<IPC::SysV::Msg> documentation. +message queue ID. MSG must begin with the native long integer message +type, which may be created with C<pack("l!", $type)>. Returns true if +successful, or false if there is an error. See also C<IPC::SysV> and +C<IPC::SysV::Msg> documentation. =item msgrcv ID,VAR,SIZE,TYPE,FLAGS @@ -3874,9 +3874,11 @@ Calls the System V IPC function C<semctl>. You'll probably have to say first to get the correct constant definitions. If CMD is IPC_STAT or GETALL, then ARG must be a variable which will hold the returned -semid_ds structure or semaphore value array. Returns like C<ioctl>: the -undefined value for error, "C<0 but true>" for zero, or the actual return -value otherwise. See also C<IPC::SysV> and C<IPC::Semaphore> documentation. +semid_ds structure or semaphore value array. Returns like C<ioctl>: +the undefined value for error, "C<0 but true>" for zero, or the actual +return value otherwise. The ARG must consist of a vector of native +short integers, which may may be created with C<pack("s!",(0)x$nsem)>. +See also C<IPC::SysV> and C<IPC::Semaphore> documentation. =item semget KEY,NSEMS,FLAGS diff --git a/t/lib/ipc_sysv.t b/t/lib/ipc_sysv.t index 55d9ba197f..8485d5dca6 100755 --- a/t/lib/ipc_sysv.t +++ b/t/lib/ipc_sysv.t @@ -81,16 +81,9 @@ if ($Config{'d_msgget'} eq 'define' && my $test5bad; my $test6bad; - if ($Config{'use64bitall'} eq 'define') { - unless (msgsnd($msg,pack("L L a*",0,$msgtype,$msgtext),IPC_NOWAIT)) { + unless (msgsnd($msg,pack("L! a*",$msgtype,$msgtext),IPC_NOWAIT)) { print "not "; $test2bad = 1; - } - } else { - unless (msgsnd($msg,pack("L a*",$msgtype,$msgtext),IPC_NOWAIT)) { - print "not "; - $test2bad = 1; - } } print "ok 2\n"; if ($test2bad) { @@ -135,11 +128,7 @@ EOM } my($rmsgtype,$rmsgtext); - if ($Config{'use64bitall'} eq 'define') { - (undef,$rmsgtype,$rmsgtext) = unpack("L L a*",$msgbuf) - } else { - ($rmsgtype,$rmsgtext) = unpack("L a*",$msgbuf) - } + ($rmsgtype,$rmsgtext) = unpack("L! a*",$msgbuf) unless($rmsgtype == $msgtype && $rmsgtext eq $msgtext) { print "not "; $test6bad = 1; |