perl 5.000perl-5.000

[editor's note: this commit combines approximate 4 months of furious
releases of Andy Dougherty and Larry Wall - see pod/perlhist.pod for
details.  Andy notes that;
 
Alas neither my "Irwin AccuTrack" nor my DC 600A quarter-inch cartridge 
backup tapes from that era seem to be readable anymore.  I guess 13 years 
exceeds the shelf life for that backup technology :-(.
]

1 files changed, 32 insertions, 5 deletions

diff --git a/hints/svr4.sh b/hints/svr4.sh
index eae477e807..c707eb8ccd 100644
--- a/hints/svr4.sh
+++ b/hints/svr4.sh
@@ -1,6 +1,33 @@
-cc='/bin/cc'
-test -f $cc || cc='/usr/ccs/bin/cc'
-ldflags='-L/usr/ucblib'
-mansrc='/usr/share/man/man1'
+# svr4 hints, System V Release 4.x
+# Use Configure -Dcc=gcc to use gcc.
+case "$cc" in
+'') cc='/bin/cc'
+    test -f $cc || cc='/usr/ccs/bin/cc'
+    cccdlflags='-Kpic'	# Probably needed for dynamic loading
+    ;;
+esac
+test -d /usr/local/man || mansrc='none'
+# We include support for using libraries in /usr/ucblib, but the setting
+# of libswanted excludes some libraries found there.  You may want to
+# prevent "ucb" from being removed from libswanted and see if perl will
+# build on your system.
+ldflags='-L/usr/ccs/lib -L/usr/ucblib'
 ccflags='-I/usr/include -I/usr/ucbinclude'
-libswanted=`echo $libswanted | sed 's/ ucb/ c ucb/'`
+libswanted=`echo $libswanted | tr ' ' '\012' | egrep -v '^(malloc|ucb)$'`
+# -lucb: Defines setreuid() and other routines Perl wants but they don't
+#	 add any/much functionality and often won't ld properly.
+# -lmalloc: Anyone know what problems this caused?
+if [  "" = "$i_ndbm"  -a  ! -f /usr/ucblib/libndbm.a  ]; then
+# UnixWare 1.1 may install /usr/ucbinclude/ndbm.h w/o /usr/ucblib/libndbm.a
+    i_ndbm="$undef"	# so Configure tries to build ext/NDBM_File and ld
+fi	# can't find dbm_open()!  "./Configure -D i_ndbm=define" overrides.
+d_index='undef'
+d_suidsafe=define	# "./Configure -d" can't figure this out
+lddlflags="-G $ldflags"	# Probably needed for dynamic loading
+usevfork='false'
+# dlopen routines exist but they don't work with perl.
+# The case statement allows experimenters to override hint with
+# Configure -D usedl
+case "$usedl" in
+'') usedl="$undef" ;;	
+esac