This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Fix Copyright
[metaconfig.git] / U / perl / d_statfs_s.U
CommitLineData
b8cde3c7
JH
1?RCS: $Id$
2?RCS:
3?RCS: Copyright (c) 1999 Jarkko Hietaniemi
4?RCS:
5?RCS: You may distribute under the terms of either the GNU General Public
6?RCS: License or the Artistic License, as specified in the README file.
7?RCS:
8?MAKE:d_statfs_s: \
9 Hasstruct i_sysparam i_sysmount i_systypes \
14ed9e9a 10 i_sysvfs i_sysstatfs Setvar
b8cde3c7
JH
11?MAKE: -pick add $@ %<
12?S:d_statfs_s:
13?S: This variable conditionally defines the HAS_STRUCT_STATFS symbol,
14?S: which indicates that the struct statfs is supported.
15?S:.
16?C:HAS_STRUCT_STATFS:
17?C: This symbol, if defined, indicates that the struct statfs
18?C: to do statfs() is supported.
19?C:.
20?H:#$d_statfs_s HAS_STRUCT_STATFS /**/
21?H:.
22?LINT:set d_statfs_s
2f125bce 23: Check for statfs_s
b8cde3c7 24echo " "
14ed9e9a 25echo "Checking to see if your system supports struct statfs..." >&4
b8cde3c7
JH
26set d_statfs_s statfs $i_systypes sys/types.h $i_sysparam sys/param.h $i_sysmount sys/mount.h $i_sysvfs sys/vfs.h $i_sysstatfs sys/statfs.h
27eval $hasstruct
28case "$d_statfs_s" in
6c094af6
JH
29"$define") echo "Yes, it does." ;;
30*) echo "No, it doesn't." ;;
b8cde3c7
JH
31esac
32
33