U/perl/d_statfs_s.U

   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 \
  10         i_sysvfs i_sysstatfs Setvar
  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
  23 : Check for statfs_s
  24 echo " "
  25 echo "Checking to see if your system supports struct statfs..." >&4
  26 set 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
  27 eval $hasstruct
  28 case "$d_statfs_s" in
  29 "$define")      echo "Yes, it does."   ;;
  30 *)              echo "No, it doesn't." ;;
  31 esac
  32
  33