This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
/\=/ does not require \ even in older awk
[metaconfig.git] / U / modified / d_statblks.U
CommitLineData
959f3c4c
JH
1?RCS: $Id: d_statblks.U,v 3.0 1993/08/18 12:07:29 ram Exp $
2?RCS:
3?RCS: Copyright (c) 1991-1993, Raphael Manfredi
2f125bce 4?RCS:
65a32477 5?RCS: You may redistribute only under the terms of the Artistic License,
959f3c4c
JH
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
65a32477 8?RCS: that same Artistic License; a copy of which may be found at the root
959f3c4c
JH
9?RCS: of the source tree for dist 3.0.
10?RCS:
11?RCS: $Log: d_statblks.U,v $
12?RCS: Revision 3.0 1993/08/18 12:07:29 ram
13?RCS: Baseline for dist 3.0 netwide release.
14?RCS:
15?MAKE:d_statblks: Hasfield i_sysstat
16?MAKE: -pick add $@ %<
17?S:d_statblks:
18?S: This variable conditionally defines USE_STAT_BLOCKS
19?S: if this system has a stat structure declaring
20?S: st_blksize and st_blocks.
21?S:.
22?C:USE_STAT_BLOCKS (STATBLOCKS):
23?C: This symbol is defined if this system has a stat structure declaring
24?C: st_blksize and st_blocks.
25?C:.
a38738d1 26?H:?%<:#ifndef USE_STAT_BLOCKS
ed194ea0 27?H:?%<:#$d_statblks USE_STAT_BLOCKS /**/
a38738d1 28?H:?%<:#endif
959f3c4c
JH
29?H:.
30?LINT:set d_statblks
31: see if stat knows about block sizes
32echo " "
cf4de4cc 33echo "Checking to see if your struct stat has st_blocks field..." >&4
959f3c4c
JH
34set d_statblks stat st_blocks $i_sysstat sys/stat.h
35eval $hasfield
36