# $Id: Head.U,v 3.0.1.9 1997/02/28 15:02:09 ram Exp $
#
-# Generated on Thu Mar 4 10:08:40 EET 1999 [metaconfig 3.0 PL70]
+# Generated on Mon Mar 15 18:36:13 EET 1999 [metaconfig 3.0 PL70]
# (with additional metaconfig patches by perlbug@perl.com)
cat >/tmp/c1$$ <<EOF
useshrplib='true'
# Why does next4 have to be so different?
case "${osname}${osvers}" in
- next4*) xxx='DYLD_LIBRARY_PATH' ;;
+ next4*|rhapsody*)
+ xxx='DYLD_LIBRARY_PATH' ;;
os2*) xxx='' ;; # Nothing special needed.
beos*) xxx='' ;;
*) xxx='LD_LIBRARY_PATH' ;;
: see how we will look up host name
echo " "
-if false; then
- : dummy stub to allow use of elif
-elif set gethostname val -f d_gethname; eval $csym; $val; then
+call=''
+if set gethostname val -f d_gethname; eval $csym; $val; then
echo 'gethostname() found.' >&4
d_gethname="$define"
call=gethostname
-elif set uname val -f d_uname; eval $csym; $val; then
+fi
+if set uname val -f d_uname; eval $csym; $val; then
if ./xenix; then
$cat <<'EOM'
uname() was found, but you're running xenix, and older versions of xenix
else
echo 'uname() found.' >&4
d_uname="$define"
- call=uname
+ case "$call" in
+ '') call=uname ;;
+ esac
fi
fi
case "$d_gethname" in
false) dflt='n';;
*) dflt='y';;
esac
- rp="Some systems have problems with vfork(). Do you want to use it?"
+ cat <<'EOM'
+
+Perl can only use a vfork() that doesn't suffer from strict
+restrictions on calling functions or modifying global data in
+the child. For example, glibc-2.1 contains such a vfork()
+that is unsuitable. If your system provides a proper fork()
+call, chances are that you do NOT want perl to use vfork().
+
+EOM
+ rp="Do you still want to use vfork()?"
. ./myread
case "$ans" in
y|Y) ;;
esac
case "$osname" in
-next) multiarch="$define" ;;
+next|rhapsody) multiarch="$define" ;;
esac
case "$multiarch" in
''|[nN]*) multiarch="$undef" ;;