This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Remove trailing whitespace on meta-lines in unit files
[metaconfig.git] / dist / U / i_sysfile.U
CommitLineData
d8875586
MBT
1?RCS: $Id: i_sysfile.U 1 2006-08-24 12:32:52Z rmanfredi $
2?RCS:
3?RCS: Copyright (c) 1991-1997, 2004-2006, Raphael Manfredi
cf39bd7e 4?RCS:
d8875586
MBT
5?RCS: You may redistribute only under the terms of the Artistic Licence,
6?RCS: as specified in the README file that comes with the distribution.
7?RCS: You may reuse parts of this distribution only within the terms of
8?RCS: that same Artistic Licence; a copy of which may be found at the root
9?RCS: of the source tree for dist 4.0.
10?RCS:
11?RCS: $Log: i_sysfile.U,v $
12?RCS: Revision 3.0.1.2 1995/07/25 14:11:36 ram
13?RCS: patch56: removed <> characters from comment, per metalint suggestion
14?RCS:
15?RCS: Revision 3.0.1.1 1993/08/25 14:01:23 ram
16?RCS: patch6: added default for i_sysfile
17?RCS:
18?RCS: Revision 3.0 1993/08/18 12:08:31 ram
19?RCS: Baseline for dist 3.0 netwide release.
20?RCS:
21?MAKE:i_sysfile: h_sysfile Inhdr Setvar
22?MAKE: -pick add $@ %<
23?S:i_sysfile:
24?S: This variable conditionally defines the I_SYS_FILE symbol, and indicates
25?S: whether a C program should include <sys/file.h> to get R_OK and friends.
26?S:.
27?C:I_SYS_FILE (I_SYSFILE):
28?C: This symbol, if defined, indicates to the C program that it should
29?C: include <sys/file.h> to get definition of R_OK and friends.
30?C:.
31?H:#$i_sysfile I_SYS_FILE /**/
32?H:.
33?T:val
34?D:i_sysfile=''
35?LINT:change h_sysfile
36?LINT:set i_sysfile
37: see if this is a sys/file.h system
38val=''
39set sys/file.h val
40eval $inhdr
41
42: do we need to include sys/file.h ?
43case "$val" in
44"$define")
45 echo " "
46 if $h_sysfile; then
47 val="$define"
48 echo "We'll be including <sys/file.h>." >&4
49 else
50 val="$undef"
51 echo "We won't be including <sys/file.h>." >&4
52 fi
53 ;;
54*)
55 h_sysfile=false
56 ;;
57esac
58set i_sysfile
59eval $setvar
60