diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 1999-02-02 20:44:30 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 1999-02-02 20:44:30 +0000 |
| commit | cb86ce0e71355d781c8bc843c5a2c7c61381dce9 (patch) | |
| tree | 104309da546ee83b7b4575614340bb45e1bc4a7c | |
| parent | 968dcd912296607f6d74dceeeccc670bbe106928 (diff) | |
| download | perl-cb86ce0e71355d781c8bc843c5a2c7c61381dce9.tar.gz | |
These should've been already in #2803.
p4raw-id: //depot/cfgperl@2804
| -rwxr-xr-x | Configure | 17 | ||||
| -rw-r--r-- | config_h.SH | 8 | ||||
| -rw-r--r-- | vms/subconfigure.com | 2 |
3 files changed, 22 insertions, 5 deletions
@@ -20,7 +20,7 @@ # $Id: Head.U,v 3.0.1.9 1997/02/28 15:02:09 ram Exp $ # -# Generated on Tue Feb 2 14:48:18 EET 1999 [metaconfig 3.0 PL70] +# Generated on Tue Feb 2 22:42:52 EET 1999 [metaconfig 3.0 PL70] # (with additional metaconfig patches by perlbug@perl.com) cat >/tmp/c1$$ <<EOF @@ -513,6 +513,7 @@ d_sysconf='' d_system='' d_tcgetpgrp='' d_tcsetpgrp='' +d_telldirproto='' d_time='' timetype='' clocktype='' @@ -9942,6 +9943,15 @@ eval $inlibc set tcsetpgrp d_tcsetpgrp eval $inlibc +: see if sys/types.h has to be included +set sys/types.h i_systypes +eval $inhdr + +: see if prototype for telldir is available +echo " " +set d_telldirproto telldir $i_systypes sys/types.h $i_dirent dirent.h +eval $hasproto + : define an is-a-typedef? function typedef='type=$1; var=$2; def=$3; shift; shift; shift; inclist=$@; case "$inclist" in @@ -10085,10 +10095,6 @@ eval $inhdr set sys/ndir.h i_sysndir eval $inhdr -: see if sys/types.h has to be included -set sys/types.h i_systypes -eval $inhdr - : see if closedir exists set closedir d_closedir eval $inlibc @@ -12751,6 +12757,7 @@ d_tcgetpgrp='$d_tcgetpgrp' d_tcsetpgrp='$d_tcsetpgrp' d_telldir64='$d_telldir64' d_telldir='$d_telldir' +d_telldirproto='$d_telldirproto' d_time='$d_time' d_times='$d_times' d_tmpfile64='$d_tmpfile64' diff --git a/config_h.SH b/config_h.SH index b67f029969..2a14102b79 100644 --- a/config_h.SH +++ b/config_h.SH @@ -2071,6 +2071,14 @@ sed <<!GROK!THIS! >config.h -e 's!^#undef\(.*/\)\*!/\*#define\1 \*!' -e 's!^#un- */ #$d_fstatvfs HAS_FSTATVFS /**/ +/* HAS_TELLDIR_PROTO: + * This symbol, if defined, indicates that the system provides + * a prototype for the telldir() function. Otherwise, it is up + * to the program to supply one. A good guess is + * extern long telldir _((DIR*)); + */ +#$d_telldirproto HAS_TELLDIR_PROTO /**/ + /* HAS_WRITEV: * This symbol, if defined, indicates that the writev routine is * available to do scatter writes. diff --git a/vms/subconfigure.com b/vms/subconfigure.com index b78f97fd93..2f787ff73a 100644 --- a/vms/subconfigure.com +++ b/vms/subconfigure.com @@ -62,6 +62,7 @@ $ myname = myhostname $ if "''myname'" .eqs. "" THEN myname = f$trnlnm("SYS$NODE") $! $! ##ADD NEW CONSTANTS HERE## +$ perl_d_telldirproto="define" $ perl_i_sysmount="undef" $ perl_d_fstatfs="undef" $ perl_d_fstatvfs="undef" @@ -3064,6 +3065,7 @@ $ WC "d_fstatvfs='" + perl_d_fstatvfs + "'" $ WC "i_mntent='" + perl_i_mntent + "'" $ WC "d_getmntent='" + perl_d_getmntent + "'" $ WC "d_hasmntopt='" + perl_d_hasmntopt + "'" +$ WC "d_telldirproto='" + perl_d_telldirproto + "'" $! $! ##WRITE NEW CONSTANTS HERE## $! |