Updated for 5.003_07

diff --git a/plan9/buildinfo b/plan9/buildinfo
index abd8e5e..849d3ce 100644 (file)
--- a/plan9/buildinfo
+++ b/plan9/buildinfo
@@ -1 +1 @@
-p9pvers = 5.003_03
+p9pvers = 5.003_05

diff --git a/plan9/config.plan9 b/plan9/config.plan9
index eccf2fb..1e4ec52 100644 (file)
--- a/plan9/config.plan9
+++ b/plan9/config.plan9
@@ -117,9 +117,9 @@
  *             2 = couldn't cast >= 0x80000000
  *             4 = couldn't cast in argument expression list
  */
-#define        CASTNEGFLOAT            /**/
+#undef CASTNEGFLOAT            /**/
 #if _P9P_OBJTYPE == 386
-#  define CASTFLAGS 2          /**/ /* config-skip */
+#  define CASTFLAGS 3          /**/ /* config-skip */
 #else
 #  define CASTFLAGS 0          /**/ /* config-skip */
 #endif
@@ -273,7 +273,12 @@
  *     This symbol, if defined, indicates that the getpgrp routine is
  *     available to get the current process group.
  */
+/* USE_BSD_GETPGRP:
+ *     This symbol, if defined, indicates that getpgrp needs one
+ *     arguments whereas USG one needs none.
+ */
 #define HAS_GETPGRP            /**/
+#undef USE_BSD_GETPGRP /**/
 
 /* HAS_GETPGRP2:
  *     This symbol, if defined, indicates that the getpgrp2() (as in DG/UX)
@@ -586,8 +591,14 @@
  *     group is to be used. For instance, you have to say setpgrp(pid, pgrp)
  *     instead of the USG setpgrp().
  */
+/* USE_BSD_SETPGRP:
+ *     This symbol, if defined, indicates that setpgrp needs two
+ *     arguments whereas USG one needs none.  See also HAS_SETPGID
+ *     for a POSIX interface.
+ */
 #undef HAS_SETPGRP             /**/
 #undef USE_BSDPGRP             /**/
+#undef USE_BSD_SETPGRP /**/
 
 /* HAS_SETPGRP2:
  *     This symbol, if defined, indicates that the setpgrp2() (as in DG/UX)
@@ -1340,7 +1351,11 @@
  *     This symbol hold the hexadecimal constant defined in byteorder,
  *     i.e. 0x1234 or 0x4321, etc...
  */
-#define BYTEORDER 0x1234       /* large digits for MSB */
+#if _P9P_OBJTYPE == 386
+#      define BYTEORDER 0x1234 /* little-endian */ /* config-skip */
+#else
+#      define BYTEORDER 0x4321 /* big-endian */  /* config-skip */
+#endif
 
 /* CSH:
  *     This symbol, if defined, indicates that the C-shell exists.
@@ -1580,6 +1595,12 @@
  */
 #undef USE_SFIO                /**/
 
+/* HAS_GETPGID:
+ *     This symbol, if defined, indicates to the C program that 
+ *     the getpgid(pid) function is available to get the
+ *     process group id.
+ */
+#undef HAS_GETPGID             /**/
 
 /* I_SYS_RESOURCE:
  *     This symbol, if defined, indicates to the C program that it should

diff --git a/plan9/exclude b/plan9/exclude
index 5b52d96..2b941ff 100644 (file)
--- a/plan9/exclude
+++ b/plan9/exclude
@@ -1,29 +1,16 @@
 comp/cpp.t
-comp/script.t
-io/argv.t
 io/dup.t
 io/fs.t
-io/inplace.t
-io/pipe.t
 lib/anydbm.t
-lib/dirhand.t
-lib/filehand.t
 lib/io_dup.t
 lib/io_pipe.t
 lib/io_sock.t
-lib/io_tell.t
 lib/io_udp.t
 lib/posix.t
-lib/safe1.t
-lib/safe2.t
 lib/socket.t
-op/eval.t
 op/exec.t
 op/goto.t
-op/magic.t
 op/misc.t
 op/oct.t
-op/readdir.t
 op/split.t
 op/stat.t
-op/tie.t

diff --git a/plan9/mkfile b/plan9/mkfile
index eeeb045..dc10cf6 100644 (file)
--- a/plan9/mkfile
+++ b/plan9/mkfile
@@ -8,7 +8,7 @@ archlib = /$objtype/lib/perl/$p9pvers
 sitelib = $privlib/site_perl
 sitearch = $archlib/site_perl
 
-CFLAGS =  -B  -D_POSIX_SOURCE -D_BSD_EXTENSION -DNO_EMBED
+CFLAGS =  -B  -D_POSIX_SOURCE -D_BSD_EXTENSION -DNO_EMBED -DMY_UV_MAX=0x7fffffffUL
 LDFLAGS = -B 
 
 CCCMD = $CC  -c $CFLAGS 
@@ -39,7 +39,7 @@ testlist = base/*.t comp/*.t cmd/*.t io/*.t op/*.t
 
 install:V:     perl preplibrary 
                cp perl /$objtype/bin/perl
-               cp plan9/aperl /rc/bin/aperl
+               cp plan9/aperl /rc/bin/Perl
                
 perl:          config.h miniperlmain.$O miniperl $archlib/Config.pm perlmain.$O $perlshr 
                $LD $CFLAGS -o perl perlmain.$O $perllib $perlshr

diff --git a/plan9/perlplan9.doc b/plan9/perlplan9.doc
index 5fc6e0f..d6d7df8 100644 (file)
--- a/plan9/perlplan9.doc
+++ b/plan9/perlplan9.doc
@@ -1,5 +1,5 @@
 
-     PLAN9/PERLPLAN9(1)   (perl 5.003, patch 01)    PLAN9/PERLPLAN9(1)
+     PLAN9/PERLPLAN9(1)   (perl 5.003, patch 05)    PLAN9/PERLPLAN9(1)
 
      N\bN\bN\bNA\bA\bA\bAM\bM\bM\bME\bE\bE\bE
           perlplan9 - Plan 9-specific documentation for Perl
@@ -22,7 +22,7 @@
           should be "#!/bin/perl" if you wish to be able to directly
           invoke the script by its name.
                Alternatively, you may invoke perl with the command
-          "aperl" instead of "perl". This will produce Acme-friendly
+          "Perl" instead of "perl". This will produce Acme-friendly
           error messages of the form "filename:18".
 
           Some scripts, usually identified with a *.PL extension, are
@@ -52,9 +52,9 @@
 
           The functions not currently implemented include:
 
-     Page 1                      6/Aug/96             (printed 8/6/96)
+     Page 1                      9/Oct/96            (printed 10/9/96)
 
-     PLAN9/PERLPLAN9(1)   (perl 5.003, patch 01)    PLAN9/PERLPLAN9(1)
+     PLAN9/PERLPLAN9(1)   (perl 5.003, patch 05)    PLAN9/PERLPLAN9(1)
 
               chown, chroot, dbmclose, dbmopen, getsockopt,
               setsockopt, recvmsg, sendmsg, getnetbyname,
@@ -82,10 +82,10 @@
           the world . . ." - Carl Sagan
 
      R\bR\bR\bRe\be\be\bev\bv\bv\bvi\bi\bi\bis\bs\bs\bsi\bi\bi\bio\bo\bo\bon\bn\bn\bn d\bd\bd\bda\ba\ba\bat\bt\bt\bte\be\be\be
-          This document was revised 06-August-1996 for Perl 5.003_2.
+          This document was revised 09-October-1996 for Perl 5.003_7.
 
      A\bA\bA\bAU\bU\bU\bUT\bT\bT\bTH\bH\bH\bHO\bO\bO\bOR\bR\bR\bR
           Luther Huffman,    lutherh@stratcom.com
 
-     Page 2                      6/Aug/96             (printed 8/6/96)
+     Page 2                      9/Oct/96            (printed 10/9/96)
 

diff --git a/plan9/perlplan9.pod b/plan9/perlplan9.pod
index f632d45..fb58149 100644 (file)
--- a/plan9/perlplan9.pod
+++ b/plan9/perlplan9.pod
@@ -21,7 +21,7 @@ such as "#!/usr/local/bin/perl". This is known as a shebang
 the perl interpreter. In Plan 9 Perl this statement should be 
 "#!/bin/perl" if you wish to be able to directly invoke the 
 script by its name.
-     Alternatively, you may invoke perl with the command "aperl"
+     Alternatively, you may invoke perl with the command "Perl"
 instead of "perl". This will produce Acme-friendly error
 messages of the form "filename:18".
 
@@ -80,7 +80,7 @@ world . . ." - Carl Sagan
 
 =head1 Revision date
 
-This document was revised 06-August-1996 for Perl 5.003_2.
+This document was revised 09-October-1996 for Perl 5.003_7.
 
 =head1 AUTHOR