Removed vestigal support for Tenon Intersystems MachTen Unix layer for MacOS Classic.
Jesse Vincent [Sat, 1 Aug 2009 21:09:41 +0000 (22:09 +0100)]
Perl hasn't supported MachTen since 5.6.

17 files changed:
MANIFEST
NetWare/Makefile
README.machten
hints/machten.sh [deleted file]
hints/machten_2.sh [deleted file]
lib/perl5db.pl
malloc.c
plan9/mkfile
pod.lst
pod/.gitignore
pod/buildtoc
pod/perl.pod
pod/perlport.pod
t/io/pipe.t
vms/descrip_mms.template
win32/Makefile
win32/makefile.mk

index 2b04a27..ed30ac0 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -1658,8 +1658,6 @@ hints/isc_2.sh                    Hints for named architecture
 hints/isc.sh                   Hints for named architecture
 hints/linux.sh                 Hints for named architecture
 hints/lynxos.sh                        Hints for named architecture
-hints/machten_2.sh             Hints for named architecture
-hints/machten.sh               Hints for named architecture
 hints/midnightbsd.sh           Hints for named architecture
 hints/mips.sh                  Hints for named architecture
 hints/mirbsd.sh                        Hints for named architecture
index f221616..9ae1c7a 100644 (file)
@@ -1376,7 +1376,6 @@ utils: $(BLDDIR)\$(NLM_NAME8).$(NLM_EXT) $(X2P)
        copy ..\README.cygwin .\perlcygwin.pod
        copy ..\README.dos .\perldos.pod
        copy ..\README.hpux .\perlhpux.pod
-#      copy ..\README.machten .\perlmachten.pod
        copy ..\README.os2 .\perlos2.pod
        copy ..\vms\perlvms.pod .\perlvms.pod
        copy ..\README.win32 .\perlwin32.pod
index f2628fd..2f6d139 100644 (file)
@@ -8,10 +8,6 @@ README.machten - Perl version 5 on Power MachTen systems
 
 =head1 DESCRIPTION
 
-This document describes how to build Perl 5 on Power MachTen systems,
-and discusses a few wrinkles in the implementation.
-
-=head2 Perl version 5.8.x and greater not supported
 
 B<Power MachTen is not supported by versions of Perl later than
 5.6.x.>
@@ -38,75 +34,6 @@ in Perl distributions published after February 2004.
 The hints file, F<hints/machten.sh>, remains a part of the
 distributions for reference purposes.
 
-=head2 Compiling Perl 5.6.x on MachTen
-
-To compile perl 5.6.x under MachTen 4.1.4 (and probably earlier versions):
-
-  ./Configure -de
-  make
-  make test
-  make install
-
-This builds and installs a statically-linked perl; MachTen's dynamic
-linking facilities are not adequate to support Perl's use of
-dynamically linked libraries.  (See F<hints/machten.sh> for more
-information.)
-
-You should have at least 32 megabytes of free memory on your
-system before running the C<make> command.
-
-For much more information on building perl -- for example, on how to
-change the default installation directory -- see F<INSTALL>.
-
-=head2 Failures during C<make test> on MachTen
-
-=over 4
-
-=item op/lexassign.t
-
-This test may fail when first run after building perl.  It does not
-fail subsequently.  The cause is unknown.
-
-=item pragma/warnings.t
-
-Test 257 fails due to a failure to warn about attempts to read from a
-filehandle which is a duplicate of stdout when stdout is attached to a
-pipe.  The output of the test contains a block comment which discusses
-a different failure, not applicable to MachTen.
-
-The root of the problem is that Machten does not assign a file type to
-either end of a pipe (see L<stat>), resulting, among other things
-in Perl's C<-p> test failing on file descriptors belonging to pipes.
-As a result, perl becomes confused, and the test for reading from a
-write-only file fails.  I am reluctant to patch perl to get around
-this, as it's clearly an OS bug (about which Tenon has been informed),
-and limited in its effect on practical Perl programs.
-
-=back
-
-=head2 Building external modules on MachTen
-
-To add an external module to perl, build in the normal way, which
-is documented in L<ExtUtils::MakeMaker>, or which can be driven
-automatically by the CPAN module (see L<CPAN>), which is part of the
-standard distribution.  If you want to install a module which
-contains XS code (C or C++ source which compiles to object code
-for linking with perl), you will have to replace your perl binary with
-a new version containing the new statically-linked object module.  The
-build process tells you how to do this.
-
-There is a gotcha, however, which users usually encounter immediately
-they respond to CPAN's invitation to C<install Bundle::CPAN>. When
-installing a I<bundle> -- a group of modules which together achieve
-some particular purpose, the installation process for later modules in
-the bundle tends to assume that earlier modules have been fully
-installed and are available for use.  This is not true on a
-statically-linked system for earlier modules which contain XS code.
-As a result the installation of the bundle fails.  The work-around is
-not to install the bundle as a one-shot operation, but instead to see
-what modules it contains, and install these one-at-a-time by hand in
-the order given.
-
 =head1 AUTHOR
 
 Dominic Dunlop <domo@computer.org>
diff --git a/hints/machten.sh b/hints/machten.sh
deleted file mode 100644 (file)
index 1aecc05..0000000
+++ /dev/null
@@ -1,276 +0,0 @@
-#! /bin/bash
-# machten.sh
-# This is for MachTen 4.1.4.  It might work on other versions and variants
-# too.  MachTen is now obsolete, lacks many features expected in modern UNIX
-# implementations, and suffers from a number of bugs which are likely never
-# to be fixed. This means that, in the absence of extensive work on
-# this file and on the perl source code, versions of perl later than 5.6.x
-# cannot successfully be built on MachTen. This file enforces this
-# restriction. Should you wish to port a later version of perl to MachTen,
-# feel free to contact me for pointers.
-#                      -- Dominic Dunlop <domo@computer.org> 040213
-#
-# Users of earlier MachTen versions might need a fixed tr from ftp.tenon.com.
-# This should be described in the MachTen release notes.
-#
-# MachTen 2.x has its own hint file.
-#
-# The original version of this file was put together by Andy Dougherty
-# <doughera@lafayette.edu> based on comments from lots of
-# folks, especially 
-#      Mark Pease <peasem@primenet.com>
-#      Martijn Koster <m.koster@webcrawler.com>
-#      Richard Yeh <rcyeh@cco.caltech.edu>
-#
-# Prevent building of perls later than 5.6.x, stating why -- see above.
-#                      -- Dominic Dunlop <domo@computer.org> 040213
-# Deny system's false claims to support mmap() and munmap(); note
-# also that Sys V IPC (re)disabled by jhi due to continuing inadequacy
-#                      -- Dominic Dunlop <domo@computer.org> 001111
-# Remove dynamic loading libraries from search; enable SysV IPC with
-# MachTen 4.1.4 and above; define SYSTEM_ALIGN_BYTES for old MT versions
-#                      -- Dominic Dunlop <domo@computer.org> 000224
-# Disable shadow password file access: MT 4.1.1 has necessary library
-# functions, but not header file (or documentation)
-#                      -- Dominic Dunlop <domo@computer.org> 990804
-# For now, explicitly disable dynamic loading -- MT 4.1.1 has it,
-# but these hints do not yet support it.
-# Define NOTEDEF_MACHTEN to undo gratuitous Tenon hack to signal.h.
-#                      -- Dominic Dunlop <domo@computer.org> 9800802
-# Completely disable SysV IPC pending more complete support from Tenon
-#                      -- Dominic Dunlop <domo@computer.org> 980712
-# Use vfork and perl's malloc by default
-#                      -- Dominic Dunlop <domo@computer.org> 980630
-# Raise perl's stack size again; cut down reg_infty; document
-#                      -- Dominic Dunlop <domo@computer.org> 980619
-# Use of semctl() can crash system: disable -- Dominic Dunlop 980506
-# Raise stack size further; slight tweaks to accomodate MT 4.1
-#                      -- Dominic Dunlop <domo@computer.org> 980211
-# Raise perl's stack size -- Dominic Dunlop <domo@tcp.ip.lu> 970922
-# Reinstate sigsetjmp iff version is 4.0.3 or greater; use nm
-# (assumes Configure change); prune libswanted -- Dominic Dunlop 970113
-# Warn about test failure due to old Berkeley db -- Dominic Dunlop 970105
-# Do not use perl's malloc; SysV IPC OK -- Neil Cutcliffe, Tenon 961030
-# File::Find's use of link count disabled by Dominic Dunlop 960528
-# Perl's use of sigsetjmp etc. disabled by Dominic Dunlop 960521
-
-# Assume that PERL_REVISON in patchlevel.h is 5.
-# If you want to try building perl-5.8.x or later, set PERL_VERSION_SAFE_MAX
-# appropriately in your environment before running Configure.
-if [ `awk '$1=="#define" && $2=="PERL_VERSION"{print $3}' patchlevel.h` \
-      -gt ${PERL_VERSION_SAFE_MAX:-6} ]
-then
-    cat <<EOF >&4
-
-Perl versions greater than 5.6.x have not been ported to MachTen. If you
-wish to build a version from the 5.6 track, please see the notes in
-README.machten
-EOF
-    exit 1
-fi
-#
-# MachTen 4.1.1's support for shadow password file access is incomplete:
-# disable its use completely.
-d_getspnam=${d_getspnam:-undef}
-
-# MachTen 4.1.1 does support dynamic loading, but perl doesn't
-# know how to use it yet.
-usedl=${usedl:-undef}
-
-# MachTen 4.1.1 may have an unhelpful hack in /usr/include/signal.h.
-# Undo it if so.
-if grep NOTDEF_MACHTEN /usr/include/signal.h > /dev/null
-then
-    ccflags="$ccflags -DNOTDEF_MACHTEN"
-fi
-
-# Power MachTen is a real memory system and its standard malloc
-# has been optimized for this. Using this malloc instead of Perl's
-# malloc may result in significant memory savings.  In particular,
-# unlike most UNIX memory allocation subsystems, MachTen's free()
-# really does return unneeded process data memory to the system.
-# However, MachTen's malloc() is woefully slow -- maybe 100 times
-# slower than perl's own, so perl's own is usually the better
-# choice.  In order to use perl's malloc(), the sbrk() system call
-# must be simulated using MachTen's malloc().  See malloc.c for
-# precise details of how this is achieved.  Recent improvements
-# to perl's malloc() currently crash MachTen, and so are disabled
-# by -DPLAIN_MALLOC and -DNO_FANCY_MALLOC.
-usemymalloc=${usemymalloc:-y}
-
-# Older versions of MachTen malloc() data on a two-byte boundary, which
-# works, but slows down operations on long, float and double data.
-# Perl's malloc() can compensate if SYSTEM_ALLOC_ALIGNMENT is suitably
-# defined.
-if expr "$osvers" \< "4.1" >/dev/null
-then
-system_alloc_alignment=" -DSYSTEM_ALLOC_ALIGNMENT=2"
-fi
-# Do not wrap the following long line
-malloc_cflags='ccflags="$ccflags -DPLAIN_MALLOC -DNO_FANCY_MALLOC -DUSE_PERL_SBRK$system_alloc_alignment"'
-
-# When MachTen does a fork(), it immediately copies the whole of
-# the parent process' data space for the child.  This can be
-# expensive.  Using vfork() where appropriate avoids this cost.
-d_vfork=${d_vfork:-define}
-
-# Specify a high level of optimization (-O3 wouldn't do much more)
-optimize=${optimize:--O2 -fomit-frame-pointer}
-
-# Make symbol table listings less voluminous
-nmopts=-gp
-
-# Set reg_infty -- the maximum allowable number of repeats in regular
-# expressions such as  /a{1,$max_repeats}/, and the maximum number of
-# times /a*/ will match.  Setting this too high without having a stack
-# large enough to accommodate deep recursion in the regular expression
-# engine allows perl to crash your Mac due to stack overrun if it
-# encounters a pathological regular expression.  The default is a
-# compromise between capability and required stack size (see below).
-# You may override the default value from the Configure command-line
-# like this:
-#
-#   Configure -Dreg_infty=16368 ...
-
-reg_infty=${reg_infty:-2047}
-
-# If you want to have many perl processes active simultaneously --
-# processing CGI forms -- for example, you should opt for a small stack.
-# For safety, you should set reg_infty no larger than the corresponding
-# value given in this table:
-#
-# Stack size  reg_infty value supported
-# ----------  -------------------------
-# 128k        2**8-1    (256)
-# 256k        2**9-1    (511)
-# 512k        2**10-1  (1023)
-#   1M        2**11-1  (2047)
-# ...
-#  16M        2**15-1 (32767) (perl's default value)
-
-# This script selects a safe stack size based on the value of reg_infty
-# specified above.  However, you may choose to take a risk and set
-# stack size lower: pathological regular expressions are rare in real-world
-# programs.  But be aware that, if perl does encounter one, it WILL
-# crash your system.  Do not set stack size lower than 96k unless
-# you want perl's installation tests ( make test ) to crash your system.
-#
-# You may override the default value from the Configure command-line
-# by specifying the required size in kilobytes like this:
-#
-#   Configure -Dstack_size=96
-
-if [ "X$stack_size" = 'X' ]
-then
-    stack_size=128
-    X=`expr $reg_infty / 256`
-
-    while [ $X -gt 0 ]
-    do
-       X=`expr $X / 2`
-       stack_size=`expr $stack_size \* 2`
-    done
-    X=`expr $stack_size \* 1024`
-fi
-
-ldflags="$ldflags -Xlstack=$X"
-ccflags="$ccflags -DREG_INFTY=$reg_infty"
-
-# Install in /usr/local by default
-prefix='/usr/local'
-
-# At least on PowerMac, doubles must be aligned on 8 byte boundaries.
-# I don't know if this is true for all MachTen systems, or how to
-# determine this automatically.
-alignbytes=8
-
-# 4.0.2 and earlier had a problem with perl's use of sigsetjmp and
-# friends.  Use setjmp and friends instead.
-expr "$osvers" \< "4.0.3" > /dev/null && d_sigsetjmp='undef'
-
-# System V IPC before MachTen 4.1.4 is incomplete (missing msg function
-# prototypes, no ftok()), buggy (semctl(.., ..,  IPC_STATUS, ..) hangs
-# system), and undocumented.  Claim it's not there at all before 4.1.4.
-if expr "$osvers" \< "4.1.4" >/dev/null
-then
-d_msg=${d_msg:-undef}
-d_sem=${d_sem:-undef}
-d_shm=${d_shm:-undef}
-fi
-
-
-# As of MachTen 4.1.4 the msg* and shm* are in libc but unimplemented
-# (an attempt to use them causes a runtime error)
-# XXX Configure probe for really functional msg*() is needed XXX
-# XXX Configure probe for really functional shm*() is needed XXX
-if test "$d_msg" = ""; then
-    d_msgget=${d_msgget:-undef}
-    d_msgctl=${d_msgctl:-undef}
-    d_msgsnd=${d_msgsnd:-undef}
-    d_msgrcv=${d_msgrcv:-undef}
-    case "$d_msgget$d_msgsnd$d_msgctl$d_msgrcv" in
-    *"undef"*) d_msg="$undef" ;;
-    esac
-fi
-if test "$d_shm" = ""; then
-    d_shmat=${d_shmat:-undef}
-    d_shmdt=${d_shmdt:-undef}
-    d_shmget=${d_shmget:-undef}
-    d_shmctl=${d_shmctl:-undef}
-    case "$d_shmat$d_shmctl$d_shmdt$d_shmget" in
-    *"undef"*) d_shm="$undef" ;;
-    esac
-fi
-
-# MachTen has stubs for mmap and munmap(), but they just result in the
-# caller being killed on the grounds of "Bad system call"
-d_mmap=${d_mmap:-undef}
-d_munmap=${d_munmap:-undef}
-
-# Get rid of some extra libs which it takes Configure a tediously
-# long time never to find on MachTen, or which break perl
-set `echo X "$libswanted "|sed -e 's/ net / /' -e 's/ socket / /' \
-    -e 's/ inet / /' -e 's/ nsl / /' -e 's/ nm / /' -e 's/ malloc / /' \
-    -e 's/ ld / /' -e 's/ sun / /' -e 's/ posix / /' \
-    -e 's/ cposix / /' -e 's/ crypt / /' -e 's/ dl / /' -e 's/ dld / /' \
-    -e 's/ ucb / /' -e 's/ bsd / /' -e 's/ BSD / /' -e 's/ PW / /'`
-shift
-libswanted="$*"
-
-# While link counts on MachTen 4.1's fast file systems work correctly,
-# on Macintosh Heirarchical File Systems, (and on HFS+)
-# MachTen always reports ony two links to directories, even if they
-# contain subdirectories.  Consequently, we use this variable to stop
-# File::Find using the link count to determine whether there are
-# subdirectories to be searched.  This will generate a harmless message:
-# Hmm...You had some extra variables I don't know about...I'll try to keep 'em.
-#      Propagating recommended variable dont_use_nlink
-dont_use_nlink=define
-
-cat <<EOM >&4
-
-At the end of Configure, you will see a harmless message
-
-Hmm...You had some extra variables I don't know about...I'll try to keep 'em.
-       Propagating recommended variable dont_use_nlink
-        Propagating recommended variable nmopts
-        Propagating recommended variable malloc_cflags...
-        Propagating recommended variable reg_infty
-        Propagating recommended variable system_alloc_alignment
-Read the File::Find documentation for more information about dont_use_nlink
-
-Your perl will be built with a stack size of ${stack_size}k and a regular
-expression repeat count limit of $reg_infty.  If you want alternative
-values, see the file hints/machten.sh for advice on how to change them.
-
-Tests
-       io/fs test 4  and
-       op/stat test 3
-may fail since MachTen may not return a useful nlinks field to stat
-on directories.
-
-EOM
-expr "$osvers" \< "4.1" >/dev/null && test -r ./broken-db.msg && \
-    . ./broken-db.msg
-
-unset stack_size X
diff --git a/hints/machten_2.sh b/hints/machten_2.sh
deleted file mode 100644 (file)
index c676205..0000000
+++ /dev/null
@@ -1,91 +0,0 @@
-# machten.sh
-# This file has been put together by Mark Pease <peasem@primenet.com>
-# Comments, questions, and improvements welcome!
-#
-# MachTen does not support dynamic loading. If you wish to, you
-# can fetch, compile, and install the dld package.
-# This ought to work with the ext/DynaLoader/dl_dld.xs in the 
-# perl5 package. Have fun!
-# Some possible locations for dld:
-# ftp-swiss.ai.mit.edu:pub/scm/dld-3.2.7.tar.gz
-# prep.ai.mit.edu:/pub/gnu/jacal/dld-3.2.7.tar.gz
-# ftp.cs.indiana.edu:/pub/scheme-repository/imp/SCM-support/dld-3.2.7.tar.gz
-# tsx-11.mit.edu:/pub/linux/sources/libs/dld-3.2.7.tar.gz
-#
-#  Original version was for MachTen 2.1.1.
-#  Last modified by Andy Dougherty   <doughera@lafayette.edu>
-#  Tue Aug 13 12:31:01 EDT 1996
-#
-#  Warning about tests which no longer fail
-#    fixed by Tom Phoenix <rootbeer@teleport.com>
-#  March 5, 1997
-#
-#  Locale, optimization, and malloc changes by Tom Phoenix Mar 15, 1997
-#
-#  groupstype change and note about t/lib/findbin.t by Tom, Mar 24, 1997
-
-# MachTen's ability to have valid filepaths beginning with "//" may
-# be causing lib/FindBin.pm to fail. I don't know how to fix it, but
-# the reader is encouraged to do so! :-)  -- Tom
-
-# There seem to be some hard-to-diagnose problems under MachTen's
-# malloc, so we'll use Perl's. If you have problems which Perl's
-# malloc's diagnostics can't help you with, you may wish to use
-# MachTen's malloc after all.
-case "$usemymalloc" in
-'') usemymalloc='y' ;;
-esac
-
-# I (Tom Phoenix) don't know how to test for locales on MachTen. (If
-# you do, please fix this hints file!) But since mine didn't come
-# with locales working out of the box, I'll assume that's the case
-# for most folks.
-case "$d_setlocale" in
-'') d_setlocale=undef
-esac
-
-# MachTen doesn't have secure setid scripts
-d_suidsafe='undef'
-
-# groupstype should be gid_t, as near as I can tell, but it only
-# seems to work right when it's int. 
-groupstype='int'
-
-case "$optimize" in
-'') optimize='-O2' ;;
-esac
-
-so='none'
-# These are useful only if you have DLD, but harmless otherwise.
-# Make sure gcc doesn't use -fpic.
-cccdlflags=' '  # That's an empty space.
-lddlflags='-r'
-dlext='o'
-
-# MachTen does not support POSIX enough to compile the POSIX module.
-useposix=false
-
-#MachTen might have an incomplete Berkeley DB implementation.
-i_db=$undef
-
-#MachTen versions 2.X have no hard links.  This variable is used
-# by File::Find.
-# This will generate a harmless message:
-# Hmm...You had some extra variables I don't know about...I'll try to keep 'em.
-#      Propagating recommended variable dont_use_nlink
-# Without this, tests io/fs #4 and op/stat #3 will fail.
-dont_use_nlink=define
-
-cat <<'EOM' >&4
-
-At the end of Configure, you will see a harmless message
-
-Hmm...You had some extra variables I don't know about...I'll try to keep 'em.
-       Propagating recommended variable dont_use_nlink
-
-Read the File::Find documentation for more information.
-
-It's possible that test t/lib/findbin.t will fail on some configurations
-of MachTen.
-
-EOM
index f78cf2f..7d824bb 100644 (file)
@@ -8183,7 +8183,6 @@ my @pods = qw(
     lexwarn
     locale
     lol
-    machten
     macos
     macosx
     modinstall
index ade45d2..75818cd 100644 (file)
--- a/malloc.c
+++ b/malloc.c
 #define MIN_BUC_POW2 (sizeof(void*) > 4 ? 3 : 2) /* Allow for 4-byte arena. */
 #define MIN_BUCKET (MIN_BUC_POW2 * BUCKETS_PER_POW2)
 
-#if !(defined(I286) || defined(atarist)
+#if !(defined(I286) || defined(atarist))
        /* take 2k unless the block is bigger than that */
 #  define LOG_OF_MIN_ARENA 11
 #else
 #define u_short unsigned short
 
 /* 286 and atarist like big chunks, which gives too much overhead. */
-#if (defined(RCHECK) || defined(I286) || defined(atarist) && defined(PACK_MALLOC)
+#if (defined(RCHECK) || defined(I286) || defined(atarist)) && defined(PACK_MALLOC)
 #  undef PACK_MALLOC
 #endif 
 
@@ -2536,7 +2536,7 @@ Perl_dump_mstats(pTHX_ const char *s)
 
 #ifdef USE_PERL_SBRK
 
-#   if defined(__MACHTEN_PPC__) || defined(NeXT) || defined(__NeXT__) || defined(PURIFY)
+#   if defined(NeXT) || defined(__NeXT__) || defined(PURIFY)
 #      define PERL_SBRK_VIA_MALLOC
 #   endif
 
index 331a886..5e5d62f 100644 (file)
@@ -23,7 +23,7 @@ installman3dir = /sys/man/2
 podnames = perl perlbook perlboot perlbot perldata perldebtut perldiag perldsc perlform perlfunc perlipc perllexwarn perllol perlmod perlmodlib perlmodinstall perlnewmod perlop perlopentut perlpacktut perlpod perlport perlrequick perlretut perlref perlreftut perlrequick perlrun perlsec perlstyle perlsub perlsyn perltie perltoc perltooc perltoot perltrap perlutil perlunifaq perluniintro perlvar
 faqpodnames = perlfaq perlfaq1 perlfaq2 perlfaq3 perlfaq4 perlfaq5 perlfaq6 perlfaq7 perlfaq8 perlfaq9
 advpodnames = perlapi perlapio perlcall perlclib perlcompile perldebguts perldbmfilter perldebug perldelta perldiag perlebcdic perlembed perlfilter perlfork perlguts perlhack perlintern perliol perllocale perlnumber perlobj perlpodspec perlre perlthrtut perltodo perlunicode perlxs perlxs perlxstut
-archpodnames = perlaix perlamiga perlapollo perlbeos perlbs2000 perlce perlcygwin perldgux perldos perlepoc perlfreebsd perlhpux perlhurd perlirix perlmachten perlmacos perlmpeix perlnetware perlos2 perlos390 perlos400 perlplan9 perlqnx perlsolaris perltru64 perluts perlvmesa perlvms perlvos perlwin32
+archpodnames = perlaix perlamiga perlapollo perlbeos perlbs2000 perlce perlcygwin perldgux perldos perlepoc perlfreebsd perlhpux perlhurd perlirix perlmacos perlmpeix perlnetware perlos2 perlos390 perlos400 perlplan9 perlqnx perlsolaris perltru64 perluts perlvmesa perlvms perlvos perlwin32
 histpods = perl5004delta perl5005delta perl561delta perl56delta perl570delta perl571delta perl572delta perl573delta perl58delta perlhist
 
 libpods = ${podnames:%=pod/%.pod}
diff --git a/pod.lst b/pod.lst
index 5ff5709..5c260b7 100644 (file)
--- a/pod.lst
+++ b/pod.lst
@@ -189,7 +189,6 @@ r perlhpux          Perl notes for HP-UX
 r perlhurd             Perl notes for Hurd
 r perlirix             Perl notes for Irix
 r perllinux            Perl notes for Linux
-r perlmachten          Perl notes for Power MachTen
 r perlmacos            Perl notes for Mac OS (Classic)
 r perlmacosx           Perl notes for Mac OS X
 r perlmpeix            Perl notes for MPE/iX
index dfeb14a..21c119d 100644 (file)
@@ -18,7 +18,6 @@
 /perljp.pod
 /perlko.pod
 /perllinux.pod
-/perlmachten.pod
 /perlmacos.pod
 /perlmacosx.pod
 /perlmodlib.pod
index cae3dfe..b3b29c5 100755 (executable)
@@ -737,6 +737,7 @@ pod/$_: pod/$Copies{$_}
 
 my $built;
 while (my ($target, $name) = each %Targets) {
+  print "Working on target $target\n" if $Verbose;
   next unless $Build{$target};
   $built++;
   if ($target eq "toc") {
index 8b7ffd8..af85429 100644 (file)
@@ -202,7 +202,6 @@ For ease of access, the Perl manual has been split up into several sections.
     perlhurd           Perl notes for Hurd
     perlirix           Perl notes for Irix
     perllinux          Perl notes for Linux
-    perlmachten        Perl notes for Power MachTen
     perlmacos          Perl notes for Mac OS (Classic)
     perlmacosx         Perl notes for Mac OS X
     perlmpeix          Perl notes for MPE/iX
index 6c11d10..713b7ea 100644 (file)
@@ -820,7 +820,6 @@ are a few of the more popular Unix flavors:
     HP-UX         hpux       PA-RISC1.1
     IRIX          irix       irix
     Mac OS X      darwin     darwin
-    MachTen PPC   machten    powerpc-machten
     NeXT 3        next       next-fat
     NeXT 4        next       OPENSTEP-Mach
     openbsd       openbsd    i386-openbsd
@@ -2277,7 +2276,7 @@ http://www.cpan.org/ports/index.html for binary distributions.
 L<perlaix>, L<perlamiga>, L<perlapollo>, L<perlbeos>, L<perlbs2000>,
 L<perlce>, L<perlcygwin>, L<perldgux>, L<perldos>, L<perlepoc>,
 L<perlebcdic>, L<perlfreebsd>, L<perlhurd>, L<perlhpux>, L<perlirix>,
-L<perlmachten>, L<perlmacos>, L<perlmacosx>, L<perlmpeix>,
+L<perlmacos>, L<perlmacosx>, L<perlmpeix>,
 L<perlnetware>, L<perlos2>, L<perlos390>, L<perlos400>,
 L<perlplan9>, L<perlqnx>, L<perlsolaris>, L<perltru64>,
 L<perlunicode>, L<perlvmesa>, L<perlvms>, L<perlvos>,
index 68e9100..9c165a3 100644 (file)
@@ -152,12 +152,11 @@ SKIP: {
 
     SKIP: {
         # Sfio doesn't report failure when closing a broken pipe
-        # that has pending output.  Go figure.  MachTen doesn't either,
-        # but won't write to broken pipes, so nothing's pending at close.
+        # that has pending output.  Go figure.
         # BeOS will not write to broken pipes, either.
         # Nor does POSIX-BC.
         skip "Won't report failure on broken pipe", 1
-          if $Config{d_sfio} || $^O eq 'machten' || $^O eq 'beos' || 
+          if $Config{d_sfio} || $^O eq 'beos' ||
              $^O eq 'posix-bc';
 
         local $SIG{PIPE} = 'IGNORE';
index 5cd120b..3a19748 100644 (file)
@@ -417,19 +417,19 @@ pod13 = [.lib.pods]perlfilter.pod [.lib.pods]perlfork.pod [.lib.pods]perlform.po
 pod14 = [.lib.pods]perlglossary.pod [.lib.pods]perlgpl.pod [.lib.pods]perlguts.pod [.lib.pods]perlhack.pod [.lib.pods]perlhaiku.pod [.lib.pods]perlhist.pod
 pod15 = [.lib.pods]perlhpux.pod [.lib.pods]perlhurd.pod [.lib.pods]perlintern.pod [.lib.pods]perlintro.pod [.lib.pods]perliol.pod [.lib.pods]perlipc.pod
 pod16 = [.lib.pods]perlirix.pod [.lib.pods]perljp.pod [.lib.pods]perlko.pod [.lib.pods]perllexwarn.pod [.lib.pods]perllinux.pod [.lib.pods]perllocale.pod
-pod17 = [.lib.pods]perllol.pod [.lib.pods]perlmachten.pod [.lib.pods]perlmacos.pod [.lib.pods]perlmacosx.pod [.lib.pods]perlmod.pod
-pod18 = [.lib.pods]perlmodinstall.pod [.lib.pods]perlmodlib.pod [.lib.pods]perlmodstyle.pod [.lib.pods]perlmpeix.pod [.lib.pods]perlmroapi.pod
-pod19 = [.lib.pods]perlnetware.pod [.lib.pods]perlnewmod.pod [.lib.pods]perlnumber.pod [.lib.pods]perlobj.pod [.lib.pods]perlop.pod
-pod20 = [.lib.pods]perlopenbsd.pod [.lib.pods]perlopentut.pod [.lib.pods]perlos2.pod [.lib.pods]perlos390.pod [.lib.pods]perlos400.pod
-pod21 = [.lib.pods]perlpacktut.pod [.lib.pods]perlperf.pod [.lib.pods]perlplan9.pod [.lib.pods]perlpod.pod [.lib.pods]perlpodspec.pod [.lib.pods]perlport.pod
-pod22 = [.lib.pods]perlpragma.pod [.lib.pods]perlqnx.pod [.lib.pods]perlre.pod [.lib.pods]perlreapi.pod [.lib.pods]perlrebackslash.pod
-pod23 = [.lib.pods]perlrecharclass.pod [.lib.pods]perlref.pod [.lib.pods]perlreftut.pod [.lib.pods]perlreguts.pod [.lib.pods]perlrepository.pod
-pod24 = [.lib.pods]perlrequick.pod [.lib.pods]perlreref.pod [.lib.pods]perlretut.pod [.lib.pods]perlriscos.pod [.lib.pods]perlrun.pod [.lib.pods]perlsec.pod
-pod25 = [.lib.pods]perlsolaris.pod [.lib.pods]perlstyle.pod [.lib.pods]perlsub.pod [.lib.pods]perlsymbian.pod [.lib.pods]perlsyn.pod
-pod26 = [.lib.pods]perlthrtut.pod [.lib.pods]perltie.pod [.lib.pods]perltoc.pod [.lib.pods]perltodo.pod [.lib.pods]perltooc.pod [.lib.pods]perltoot.pod
-pod27 = [.lib.pods]perltrap.pod [.lib.pods]perltru64.pod [.lib.pods]perltw.pod [.lib.pods]perlunicode.pod [.lib.pods]perlunifaq.pod
-pod28 = [.lib.pods]perluniintro.pod [.lib.pods]perlunitut.pod [.lib.pods]perlutil.pod [.lib.pods]perluts.pod [.lib.pods]perlvar.pod [.lib.pods]perlvmesa.pod
-pod29 = [.lib.pods]perlvms.pod [.lib.pods]perlvos.pod [.lib.pods]perlwin32.pod [.lib.pods]perlxs.pod [.lib.pods]perlxstut.pod
+pod17 = [.lib.pods]perllol.pod [.lib.pods]perlmacos.pod [.lib.pods]perlmacosx.pod [.lib.pods]perlmod.pod [.lib.pods]perlmodinstall.pod
+pod18 = [.lib.pods]perlmodlib.pod [.lib.pods]perlmodstyle.pod [.lib.pods]perlmpeix.pod [.lib.pods]perlmroapi.pod [.lib.pods]perlnetware.pod
+pod19 = [.lib.pods]perlnewmod.pod [.lib.pods]perlnumber.pod [.lib.pods]perlobj.pod [.lib.pods]perlop.pod [.lib.pods]perlopenbsd.pod
+pod20 = [.lib.pods]perlopentut.pod [.lib.pods]perlos2.pod [.lib.pods]perlos390.pod [.lib.pods]perlos400.pod [.lib.pods]perlpacktut.pod
+pod21 = [.lib.pods]perlperf.pod [.lib.pods]perlplan9.pod [.lib.pods]perlpod.pod [.lib.pods]perlpodspec.pod [.lib.pods]perlport.pod [.lib.pods]perlpragma.pod
+pod22 = [.lib.pods]perlqnx.pod [.lib.pods]perlre.pod [.lib.pods]perlreapi.pod [.lib.pods]perlrebackslash.pod [.lib.pods]perlrecharclass.pod
+pod23 = [.lib.pods]perlref.pod [.lib.pods]perlreftut.pod [.lib.pods]perlreguts.pod [.lib.pods]perlrepository.pod [.lib.pods]perlrequick.pod
+pod24 = [.lib.pods]perlreref.pod [.lib.pods]perlretut.pod [.lib.pods]perlriscos.pod [.lib.pods]perlrun.pod [.lib.pods]perlsec.pod [.lib.pods]perlsolaris.pod
+pod25 = [.lib.pods]perlstyle.pod [.lib.pods]perlsub.pod [.lib.pods]perlsymbian.pod [.lib.pods]perlsyn.pod [.lib.pods]perlthrtut.pod [.lib.pods]perltie.pod
+pod26 = [.lib.pods]perltoc.pod [.lib.pods]perltodo.pod [.lib.pods]perltooc.pod [.lib.pods]perltoot.pod [.lib.pods]perltrap.pod [.lib.pods]perltru64.pod
+pod27 = [.lib.pods]perltw.pod [.lib.pods]perlunicode.pod [.lib.pods]perlunifaq.pod [.lib.pods]perluniintro.pod [.lib.pods]perlunitut.pod
+pod28 = [.lib.pods]perlutil.pod [.lib.pods]perluts.pod [.lib.pods]perlvar.pod [.lib.pods]perlvmesa.pod [.lib.pods]perlvms.pod [.lib.pods]perlvos.pod
+pod29 = [.lib.pods]perlwin32.pod [.lib.pods]perlxs.pod [.lib.pods]perlxstut.pod
 pod = $(pod0) $(pod1) $(pod2) $(pod3) $(pod4) $(pod5) $(pod6) $(pod7) $(pod8) $(pod9) $(pod10) $(pod11) $(pod12) $(pod13) $(pod14) $(pod15) $(pod16) $(pod17) $(pod18) $(pod19) $(pod20) $(pod21) $(pod22) $(pod23) $(pod24) $(pod25) $(pod26) $(pod27) $(pod28) $(pod29)
 
 # Would be useful to automate the generation of this rule from pod/buildtoc
@@ -1126,10 +1126,6 @@ makeppport : $(MINIPERL_EXE) $(ARCHDIR)Config.pm
        @ If F$Search("[.lib]pods.dir").eqs."" Then Create/Directory [.lib.pods]
        Copy/NoConfirm/Log $(MMS$SOURCE) [.lib.pods]
 
-[.lib.pods]perlmachten.pod : [.pod]perlmachten.pod
-       @ If F$Search("[.lib]pods.dir").eqs."" Then Create/Directory [.lib.pods]
-       Copy/NoConfirm/Log $(MMS$SOURCE) [.lib.pods]
-
 [.lib.pods]perlmacos.pod : [.pod]perlmacos.pod
        @ If F$Search("[.lib]pods.dir").eqs."" Then Create/Directory [.lib.pods]
        Copy/NoConfirm/Log $(MMS$SOURCE) [.lib.pods]
index bf2e03c..ec8d074 100644 (file)
@@ -1110,7 +1110,6 @@ utils: $(PERLEXE) $(X2P)
        copy ..\README.jp       ..\pod\perljp.pod
        copy ..\README.ko       ..\pod\perlko.pod
        copy ..\README.linux    ..\pod\perllinux.pod
-       copy ..\README.machten  ..\pod\perlmachten.pod
        copy ..\README.macos    ..\pod\perlmacos.pod
        copy ..\README.macosx   ..\pod\perlmacosx.pod
        copy ..\README.mpeix    ..\pod\perlmpeix.pod
@@ -1205,12 +1204,12 @@ distclean: realclean
            perlcygwin.pod perldelta.pod perldgux.pod perldos.pod \
            perlepoc.pod perlfreebsd.pod perlhaiku.pod perlhpux.pod \
            perlhurd.pod perlintern.pod perlirix.pod perljp.pod perlko.pod \
-           perllinux.pod perlmachten.pod perlmacos.pod perlmacosx.pod \
-           perlmodlib.pod perlmpeix.pod perlnetware.pod \
-           perlopenbsd.pod perlos2.pod perlos390.pod perlos400.pod \
-           perlplan9.pod perlqnx.pod perlriscos.pod perlsolaris.pod \
-           perlsymbian.pod perltoc.pod perltru64.pod perltw.pod \
-           perluts.pod perlvmesa.pod perlvos.pod perlwin32.pod \
+           perllinux.pod perlmacos.pod perlmacosx.pod \
+           perlmodlib.pod perlmpeix.pod perlnetware.pod perlopenbsd.pod \
+           perlos2.pod perlos390.pod perlos400.pod perlplan9.pod \
+           perlqnx.pod perlriscos.pod perlsolaris.pod perlsymbian.pod \
+           perltoc.pod perltru64.pod perltw.pod perluts.pod perlvmesa.pod \
+           perlvos.pod perlwin32.pod \
            pod2html pod2latex pod2man pod2text pod2usage \
            podchecker podselect
        -cd ..\utils && del /f h2ph splain perlbug pl2pm c2ph pstruct h2xs \
index ade7823..6549134 100644 (file)
@@ -1434,7 +1434,6 @@ utils: $(PERLEXE) $(X2P)
        copy ..\README.jp       ..\pod\perljp.pod
        copy ..\README.ko       ..\pod\perlko.pod
        copy ..\README.linux    ..\pod\perllinux.pod
-       copy ..\README.machten  ..\pod\perlmachten.pod
        copy ..\README.macos    ..\pod\perlmacos.pod
        copy ..\README.macosx   ..\pod\perlmacosx.pod
        copy ..\README.mpeix    ..\pod\perlmpeix.pod
@@ -1527,12 +1526,12 @@ distclean: realclean
            perlcygwin.pod perldelta.pod perldgux.pod perldos.pod \
            perlepoc.pod perlfreebsd.pod perlhaiku.pod perlhpux.pod \
            perlhurd.pod perlintern.pod perlirix.pod perljp.pod perlko.pod \
-           perllinux.pod perlmachten.pod perlmacos.pod perlmacosx.pod \
-           perlmodlib.pod perlmpeix.pod perlnetware.pod \
-           perlopenbsd.pod perlos2.pod perlos390.pod perlos400.pod \
-           perlplan9.pod perlqnx.pod perlriscos.pod perlsolaris.pod \
-           perlsymbian.pod perltoc.pod perltru64.pod perltw.pod \
-           perluts.pod perlvmesa.pod perlvos.pod perlwin32.pod \
+           perllinux.pod perlmacos.pod perlmacosx.pod \
+           perlmodlib.pod perlmpeix.pod perlnetware.pod perlopenbsd.pod \
+           perlos2.pod perlos390.pod perlos400.pod perlplan9.pod \
+           perlqnx.pod perlriscos.pod perlsolaris.pod perlsymbian.pod \
+           perltoc.pod perltru64.pod perltw.pod perluts.pod perlvmesa.pod \
+           perlvos.pod perlwin32.pod \
            pod2html pod2latex pod2man pod2text pod2usage \
            podselect
        -cd ..\utils && del /f h2ph splain perlbug pl2pm c2ph pstruct h2xs \