From: Luther Huffman <lutherh@infinet.com>
Date: Mon, 18 Nov 1996 06:06:37 +0000 (+1200)
Subject: Plan 9 update
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=16da7c01952bf5f7750f4358fd0efd623fed30eb;p=p5sagit%2Fp5-mst-13.2.git

Plan 9 update
---

diff --git a/plan9/buildinfo b/plan9/buildinfo
index 849d3ce..4fcbae6 100644
--- a/plan9/buildinfo
+++ b/plan9/buildinfo
@@ -1 +1 @@
-p9pvers = 5.003_05
+p9pvers = 5.003_08
diff --git a/plan9/config.plan9 b/plan9/config.plan9
index 1e4ec52..b10c758 100644
--- a/plan9/config.plan9
+++ b/plan9/config.plan9
@@ -1,22 +1,14 @@
-/* This file (config_H) is a sample config.h file.  If you are unable
-   to successfully run Configure, copy this file to config.h and
-   edit it to suit your system.
-*/
 /*
- * This file was produced by running the config_h.SH script, which
- * gets its values from config.sh, which is generally produced by
- * running Configure.
- *
- * Feel free to modify any of this as the need arises.  Note, however,
- * that running config_h.SH again will wipe out any changes you've made.
- * For a more permanent change edit config.sh and rerun config_h.SH.
- *
- * $Id: Config_h.U,v 3.0.1.4 1995/09/25 09:10:49 ram Exp $
- */
+ * This file is mangled by fndvers (and perhaps other scripts) to produce the config.h 
+ * for Plan 9. It was handwritten because the standard configuration scripts were
+ * written in a shell dialect incomprehensible to Plan 9. 
+ * config.h for Plan 9
+ * Version: 5.004
+ */                 
 
-/* Configuration time: Thu Feb  8 17:15:11 EST 1996
- * Configured by: doughera
- * Target system: sunos fractal 5.4 generic_101946-29 i86pc i386 
+/* Configuration time: 21-Oct-1996 15:11
+ * Configured by: Luther Huffman, lutherh@stratcom.com
+ * Target system: Plan 9
  */
 
 #ifndef _config_h_
@@ -43,7 +35,15 @@
  *	This symbol contains the number of bytes required to align a
  *	double. Usual values are 2, 4 and 8.
  */
-#define MEM_ALIGNBYTES 8	/* config-skip */
+#if (_P9P_OBJTYPE == 386) || (_P9P_OBJTYPE==power)
+#	define MEM_ALIGNBYTES 4	 /* config-skip */
+#else
+# if _P9P_OBJTYPE == 68020
+#	define MEM_ALIGNBYTES 2  /* config-skip */
+# else
+#	define MEM_ALIGNBYTES 8 /* config-skip */
+# endif
+#endif
 
 /* BIN:
  *	This symbol holds the path of the bin directory where the package will
diff --git a/plan9/exclude b/plan9/exclude
index 2b941ff..7d9fc3c 100644
--- a/plan9/exclude
+++ b/plan9/exclude
@@ -2,6 +2,8 @@ comp/cpp.t
 io/dup.t
 io/fs.t
 lib/anydbm.t
+lib/complex.t
+lib/filefind.t
 lib/io_dup.t
 lib/io_pipe.t
 lib/io_sock.t
diff --git a/plan9/genconfig.pl b/plan9/genconfig.pl
index edcaf33..c23bd88 100644
--- a/plan9/genconfig.pl
+++ b/plan9/genconfig.pl
@@ -82,7 +82,6 @@ eunicefix=':'
 hint='none'
 hintfile=''
 intsize='4'
-alignbytes='8'
 shrplib='define'
 usemymalloc='n'
 usevfork='true'
@@ -127,24 +126,26 @@ print OUT "siglongjmp='siglongjmp(buf,retval) '\n";
 print OUT "exe_ext=''\n";
 if ($p9p_objtype eq '386') {
 	$objext = '.8';
+	$alignbytes = '4';
+	$cstflags = 2;
 }
 elsif ($p9p_objtype eq '68020') {
 	$objext = '.2';
+	$alignbytes = '2';
+	$cstflags = 0;
 }
 elsif ($p9p_objtype eq 'mips') {
 	$objext = '.v';
+	$alignbytes = '8';
+	$cstflags = 0;
 }
 elsif ($p9p_objtype eq 'sparc') {
 	$objext = '.k';
-}
-print OUT "obj_ext='$objext'\n";
-
-if ($p9p_objtype eq '386') {
-	$cstflags = 2;
-}
-else {
+	$alignbytes = '4';
 	$cstflags = 0;
 }
+print OUT "obj_ext='$objext'\n";
+print OUT "alignbytes='$alignbytes'\n";
 print OUT "castflags='$cstflags'\n";
 
 $myname = $ENV{'site'} ;
diff --git a/plan9/mkfile b/plan9/mkfile
index dc10cf6..938b8e6 100644
--- 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 -DMY_UV_MAX=0x7fffffffUL
+CFLAGS =  -B  -D_POSIX_SOURCE -D_BSD_EXTENSION -DMY_UV_MAX=0x7fffffffUL
 LDFLAGS = -B 
 
 CCCMD = $CC  -c $CFLAGS 
@@ -40,6 +40,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/Perl
+		mk man
 		
 perl:		config.h miniperlmain.$O miniperl $archlib/Config.pm perlmain.$O $perlshr 
 		$LD $CFLAGS -o perl perlmain.$O $perllib $perlshr
diff --git a/plan9/setup.rc b/plan9/setup.rc
index 037ecfb..dd96c1f 100644
--- a/plan9/setup.rc
+++ b/plan9/setup.rc
@@ -9,8 +9,11 @@
 awk -f versnum ../patchlevel.h
 . buildinfo
 builddir = `{ cd .. ; pwd } 
-if(flag a) platforms = (386 mips sparc 68020)
-if not platforms = $objtype
+if (~ $#* 0) platforms = $objtype
+if not switch($1) {
+	case -a ; platforms = (386 mips sparc 68020)
+	case * ; echo 'Usage: setup.rc [-a]' >[1=2] ; exit
+}
 sourcedir=/sys/src/cmd/perl/$p9pvers
 privlib=/sys/lib/perl
 sitelib=$privlib/site_perl