This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
metaconfig maintenance.
authorJarkko Hietaniemi <jhi@iki.fi>
Wed, 31 May 2000 20:00:24 +0000 (20:00 +0000)
committerJarkko Hietaniemi <jhi@iki.fi>
Wed, 31 May 2000 20:00:24 +0000 (20:00 +0000)
p4raw-id: //depot/metaconfig@6173

U/modified/Inhdr.U [new file with mode: 0644]
U/perl/d_finitel.U [new file with mode: 0644]
U/perl/d_getcwd.U [new file with mode: 0644]
U/perl/d_llseek.U [new file with mode: 0644]
U/perl/i_fp_class.U [new file with mode: 0644]
U/perl/i_iconv.U [new file with mode: 0644]
U/perl/i_ieeefp.U [new file with mode: 0644]
U/perl/i_syslog.U [new file with mode: 0644]
U/perl/i_sysrusage.U [new file with mode: 0644]
U/perl/i_ulimit.U [new file with mode: 0644]
U/typedefs/inotype.U [new file with mode: 0644]

diff --git a/U/modified/Inhdr.U b/U/modified/Inhdr.U
new file mode 100644 (file)
index 0000000..c55db84
--- /dev/null
@@ -0,0 +1,78 @@
+?RCS: $Id: Inhdr.U,v 3.0.1.2 1995/05/12 12:01:31 ram Exp $
+?RCS:
+?RCS: Copyright (c) 1991-1993, Raphael Manfredi
+?RCS: 
+?RCS: You may redistribute only under the terms of the Artistic Licence,
+?RCS: as specified in the README file that comes with the distribution.
+?RCS: You may reuse parts of this distribution only within the terms of
+?RCS: that same Artistic Licence; a copy of which may be found at the root
+?RCS: of the source tree for dist 3.0.
+?RCS:
+?RCS: $Log: Inhdr.U,v $
+?RCS: Revision 3.0.1.2  1995/05/12  12:01:31  ram
+?RCS: patch54: deleted tabs that caused some /bin/sh to core dump (ADO)
+?RCS:
+?RCS: Revision 3.0.1.1  1994/10/29  15:55:01  ram
+?RCS: patch36: call ./whoa explicitely instead of relying on PATH
+?RCS:
+?RCS: Revision 3.0  1993/08/18  12:05:01  ram
+?RCS: Baseline for dist 3.0 netwide release.
+?RCS:
+?X:
+?X: This unit checks wether a set of header files exists or not.
+?X:    If the first header is not found, the function tries to locate
+?X: the next header, and so on, until one is found or there is no
+?X: more header in the list.
+?X:
+?X: To use it, say:
+?X: set header i_header [ header2 i_header2 ... ]
+?X: eval $inhdr
+?X:
+?MAKE:Inhdr: test Findhdr Whoa
+?MAKE: -pick add $@ %<
+?LINT:define inhdr
+?LINT:use ccflags
+?V:inhdr
+?S:inhdr:
+?S:    This shell variable is used internally by Configure to check
+?S:    wether a set of headers exist or not. A typical use is:
+?S:            set header i_header [ header2 i_header2 ... ]
+?S:            eval $inhdr
+?S:    That will print a message, saying wether header was found or
+?S:    not and set i_header* accordingly. If the first header is not
+?S: found, we try the next one, until the list is empty or one is found.
+?S:.
+?T:xxx xxf var td xxnf tu yyy instead was cont
+: define an alternate in-header-list? function
+inhdr='echo " "; td=$define; tu=$undef; yyy=$@;
+cont=true; xxf="echo \"<\$1> found.\" >&4";
+case $# in 2) xxnf="echo \"<\$1> NOT found.\" >&4";;
+*) xxnf="echo \"<\$1> NOT found, ...\" >&4";;
+esac;
+case $# in 4) instead=instead;; *) instead="at last";; esac;
+while $test "$cont"; do
+       xxx=`./findhdr $1`
+       var=$2; eval "was=\$$2";
+       if $test "$xxx" && $test -r "$xxx";
+       then eval $xxf;
+?X: Next line shifted left 1 tabstop to avoid sh core dump on MachTen 2.1.1.
+       eval "case \"\$$var\" in $undef) . ./whoa; esac"; eval "$var=\$td";
+               cont="";
+       else eval $xxnf;
+?X: Likewise, the next line has been shifted left 1 tabstop -- ADO, 08/03/95
+       eval "case \"\$$var\" in $define) . ./whoa; esac"; eval "$var=\$tu"; fi;
+       set $yyy; shift; shift; yyy=$@;
+       case $# in 0) cont="";;
+       2) xxf="echo \"but I found <\$1> $instead.\" >&4";
+               xxnf="echo \"and I did not find <\$1> either.\" >&4";;
+       *) xxf="echo \"but I found <\$1\> instead.\" >&4";
+               xxnf="echo \"there is no <\$1>, ...\" >&4";;
+       esac;
+done;
+?X: Remaining values are set to 'undef'
+while $test "$yyy";
+do set $yyy; var=$2; eval "was=\$$2";
+       eval "case \"\$$var\" in $define) . ./whoa; esac"; eval "$var=\$tu";
+       set $yyy; shift; shift; yyy=$@;
+done'
+
diff --git a/U/perl/d_finitel.U b/U/perl/d_finitel.U
new file mode 100644 (file)
index 0000000..2aa0063
--- /dev/null
@@ -0,0 +1,25 @@
+?RCS: $Id$
+?RCS:
+?RCS: Copyright (c) 2000 Jarkko Hietaniemi
+?RCS:
+?RCS: You may distribute under the terms of either the GNU General Public
+?RCS: License or the Artistic License, as specified in the README file.
+?RCS:
+?MAKE:d_finitel: Inlibc
+?MAKE: -pick add $@ %<
+?S:d_finitel:
+?S:    This variable conditionally defines the HAS_FINITEL symbol, which
+?S:    indicates to the C program that the finitel() routine is available.
+?S:.
+?C:HAS_FINITEL:
+?C:    This symbol, if defined, indicates that the finitel routine is
+?C:    available to check whether a long double is finite
+?C:    (non-infinity non-NaN).
+?C:.
+?H:#$d_finitel HAS_FINITEL             /**/
+?H:.
+?LINT:set d_finitel
+: see if finitel exists
+set finitel d_finitel
+eval $inlibc
+
diff --git a/U/perl/d_getcwd.U b/U/perl/d_getcwd.U
new file mode 100644 (file)
index 0000000..9d464ab
--- /dev/null
@@ -0,0 +1,25 @@
+?RCS: $Id$
+?RCS:
+?RCS: Copyright (c) 2000 Jarkko Hietaniemi
+?RCS:
+?RCS: You may distribute under the terms of either the GNU General Public
+?RCS: License or the Artistic License, as specified in the README file.
+?RCS:
+?MAKE:d_getcwd: Inlibc
+?MAKE: -pick add $@ %<
+?S:d_getcwd:
+?S:    This variable conditionally defines the HAS_GETCWD symbol, which
+?S:    indicates to the C program that the getcwd() routine is available
+?S:    to get the current working directory.
+?S:.
+?C:HAS_GETCWD :
+?C:    This symbol, if defined, indicates that the getcwd routine is
+?C:    available to get the current working directory.
+?C:.
+?H:#$d_getcwd HAS_GETCWD               /**/
+?H:.
+?LINT:set d_getcwd
+: see if getcwd exists
+set getcwd d_getcwd
+eval $inlibc
+
diff --git a/U/perl/d_llseek.U b/U/perl/d_llseek.U
new file mode 100644 (file)
index 0000000..4b2087c
--- /dev/null
@@ -0,0 +1,24 @@
+?RCS: $Id$
+?RCS:
+?RCS: Copyright (c) 1999 Jarkko Hietaniemi
+?RCS:
+?RCS: You may distribute under the terms of either the GNU General Public
+?RCS: License or the Artistic License, as specified in the README file.
+?RCS:
+?MAKE:d_llseek: Inlibc
+?MAKE: -pick add $@ %<
+?S:d_llseek:
+?S:    This variable conditionally defines the HAS_LLSEEK symbol, which
+?S:    indicates to the C program that the llseek() routine is available.
+?S:.
+?C:HAS_LLSEEK:
+?C:    This symbol, if defined, indicates that the llseek routine is
+?C:    available to seek files larger than 2 gigabytes.
+?C:.
+?H:#$d_llseek HAS_LLSEEK               /**/
+?H:.
+?LINT:set d_llseek
+: see if llseek exists
+set llseek d_llseek
+eval $inlibc
+
diff --git a/U/perl/i_fp_class.U b/U/perl/i_fp_class.U
new file mode 100644 (file)
index 0000000..9675ab4
--- /dev/null
@@ -0,0 +1,24 @@
+?RCS: $Id: i_fp_class.U,v $
+?RCS:
+?RCS: Copyright (c) 1998 Jarkko Hietaniemi
+?RCS:
+?RCS: You may distribute under the terms of either the GNU General Public
+?RCS: License or the Artistic License, as specified in the README file.
+?RCS:
+?MAKE:i_fp_class: Inhdr Hasfield
+?MAKE: -pick add $@ %<
+?S:i_fp_class:
+?S:    This variable conditionally defines the I_FP_CLASS symbol, and indicates
+?S:    whether a C program should include <fp_class.h>.
+?S:.
+?C:I_FP_CLASS:
+?C:    This symbol, if defined, indicates that <fp_class.h> exists and
+?C:    should be included.
+?C:.
+?H:#$i_fp_class        I_FP_CLASS              /**/
+?H:.
+?LINT:set i_fp_class
+: see if this is a fp_class.h system
+set fp_class.h i_fp_class
+eval $inhdr
+
diff --git a/U/perl/i_iconv.U b/U/perl/i_iconv.U
new file mode 100644 (file)
index 0000000..7e60b8e
--- /dev/null
@@ -0,0 +1,24 @@
+?RCS: $Id: i_iconv.U,v $
+?RCS:
+?RCS: Copyright (c) 2000 Jarkko Hietaniemi
+?RCS:
+?RCS: You may distribute under the terms of either the GNU General Public
+?RCS: License or the Artistic License, as specified in the README file.
+?RCS:
+?MAKE:i_iconv: Inhdr Hasfield
+?MAKE: -pick add $@ %<
+?S:i_iconv:
+?S:    This variable conditionally defines the I_ICONV symbol, and indicates
+?S:    whether a C program should include <iconv.h>.
+?S:.
+?C:I_ICONV:
+?C:    This symbol, if defined, indicates that <iconv.h> exists and
+?C:    should be included.
+?C:.
+?H:#$i_iconv   I_ICONV         /**/
+?H:.
+?LINT:set i_iconv
+: see if this is a iconv.h system
+set iconv.h i_iconv
+eval $inhdr
+
diff --git a/U/perl/i_ieeefp.U b/U/perl/i_ieeefp.U
new file mode 100644 (file)
index 0000000..427422d
--- /dev/null
@@ -0,0 +1,24 @@
+?RCS: $Id: i_ieeefp.U,v $
+?RCS:
+?RCS: Copyright (c) 1998 Jarkko Hietaniemi
+?RCS:
+?RCS: You may distribute under the terms of either the GNU General Public
+?RCS: License or the Artistic License, as specified in the README file.
+?RCS:
+?MAKE:i_ieeefp: Inhdr Hasfield
+?MAKE: -pick add $@ %<
+?S:i_ieeefp:
+?S:    This variable conditionally defines the I_IEEEFP symbol, and indicates
+?S:    whether a C program should include <ieeefp.h>.
+?S:.
+?C:I_IEEEFP:
+?C:    This symbol, if defined, indicates that <ieeefp.h> exists and
+?C:    should be included.
+?C:.
+?H:#$i_ieeefp  I_IEEEFP                /**/
+?H:.
+?LINT:set i_ieeefp
+: see if this is a ieeefp.h system
+set ieeefp.h i_ieeefp
+eval $inhdr
+
diff --git a/U/perl/i_syslog.U b/U/perl/i_syslog.U
new file mode 100644 (file)
index 0000000..2fec042
--- /dev/null
@@ -0,0 +1,25 @@
+?RCS: $Id: i_syslog.U,v $
+?RCS:
+?RCS: Copyright (c) 2000 Jarkko Hietaniemi
+?RCS:
+?RCS: You may distribute under the terms of either the GNU General Public
+?RCS: License or the Artistic License, as specified in the README file.
+?RCS:
+?MAKE:i_syslog: Inhdr Hasfield
+?MAKE: -pick add $@ %<
+?S:i_syslog:
+?S:    This variable conditionally defines the I_SYSLOG symbol,
+?S:    and indicates whether a C program should include <syslog.h>.
+?S:.
+?C:I_SYSLOG:
+?C:    This symbol, if defined, indicates that <syslog.h> exists and
+?C:    should be included.
+?C:.
+?H:#$i_syslog  I_SYSLOG                /**/
+?H:.
+?LINT:set i_syslog
+
+: see if this is a syslog.h system
+set syslog.h i_syslog
+eval $inhdr
+
diff --git a/U/perl/i_sysrusage.U b/U/perl/i_sysrusage.U
new file mode 100644 (file)
index 0000000..a6c5a68
--- /dev/null
@@ -0,0 +1,25 @@
+?RCS: $Id: i_sysrusage.U,v $
+?RCS:
+?RCS: Copyright (c) 2000 Jarkko Hietaniemi
+?RCS:
+?RCS: You may distribute under the terms of either the GNU General Public
+?RCS: License or the Artistic License, as specified in the README file.
+?RCS:
+?MAKE:i_sysrusage: Inhdr Hasfield
+?MAKE: -pick add $@ %<
+?S:i_sysrusage:
+?S:    This variable conditionally defines the I_SYSRUSAGE symbol,
+?S:    and indicates whether a C program should include <sys/rusage.h>.
+?S:.
+?C:I_SYSRUSAGE:
+?C:    This symbol, if defined, indicates that <sys/rusage.h> exists and
+?C:    should be included.
+?C:.
+?H:#$i_sysrusage       I_SYSRUSAGE             /**/
+?H:.
+?LINT:set i_sysrusage
+
+: see if this is a sys/rusage.h system
+set sys/rusage.h i_sysrusage
+eval $inhdr
+
diff --git a/U/perl/i_ulimit.U b/U/perl/i_ulimit.U
new file mode 100644 (file)
index 0000000..01bcc51
--- /dev/null
@@ -0,0 +1,24 @@
+?RCS: $Id: i_ulimit.U,v $
+?RCS:
+?RCS: Copyright (c) 1998 Jarkko Hietaniemi
+?RCS:
+?RCS: You may distribute under the terms of either the GNU General Public
+?RCS: License or the Artistic License, as specified in the README file.
+?RCS:
+?MAKE:i_ulimit: Inhdr Hasfield
+?MAKE: -pick add $@ %<
+?S:i_ulimit:
+?S:    This variable conditionally defines the I_ULIMIT symbol, and indicates
+?S:    whether a C program should include <ulimit.h>.
+?S:.
+?C:I_ULIMIT:
+?C:    This symbol, if defined, indicates that <ulimit.h> exists and
+?C:    should be included.
+?C:.
+?H:#$i_ulimit  I_ULIMIT                /**/
+?H:.
+?LINT:set i_ulimit
+: see if this is a ulimit.h system
+set ulimit.h i_ulimit
+eval $inhdr
+
diff --git a/U/typedefs/inotype.U b/U/typedefs/inotype.U
new file mode 100644 (file)
index 0000000..fadd1ef
--- /dev/null
@@ -0,0 +1,30 @@
+?RCS: $Id$
+?RCS:
+?RCS: Copyright (c) 1999, Jarkko Hietaniemi
+?RCS: 
+?RCS: You may redistribute only under the terms of the Artistic Licence,
+?RCS: as specified in the README file that comes with the distribution.
+?RCS: You may reuse parts of this distribution only within the terms of
+?RCS: that same Artistic Licence; a copy of which may be found at the root
+?RCS: of the source tree for dist 3.0.
+?RCS:
+?MAKE:inotype: Myread Typedef
+?MAKE: -pick add $@ %<
+?S:inotype:
+?S:    This variable defines Ino_t to be something like ino_t, long,
+?S:    int, or whatever type is used to declare inode numbers.
+?S:.
+?C:Ino_t:
+?C:    This symbol holds the type used to declare inode numbers.
+?C:    It can be int, long, ino_t, etc...
+?C:    It may be necessary to include <sys/types.h> to get any
+?C:    typedef'ed information.
+?C:.
+?H:#define Ino_t $inotype      /* <inode> type */
+?H:.
+?LINT: set inotype
+: see what type is used for inodes
+rp="What is the type used for inode numbers on this system?"
+set ino_t inotype long stdio.h sys/types.h
+eval $typedef_ask
+