Continue largefileness separation from quadness;

[metaconfig.git] / U / perl / uselfs.U

?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:uselargefiles: Myread Oldconfig Setvar
?MAKE:	-pick add $@ %<
?Y:TOP
?S:uselargefiles:
?S:	This variable conditionally defines the USE_LARGE_FILES symbol,
?S:	and indicates that large file interfaces should be used when
?S:	available.  The use64bits symbol will also be turned on if necessary.
?S:.
?C:USE_LARGE_FILES:
?C:	This symbol, if defined, indicates that large file support
?C:	should be used when available.  The USE_64_BITS symbol will
?C:	also be turned on if necessary.
?C:.
?H:?%<:#ifndef USE_LARGE_FILES
?H:?%<:#$uselargefiles	USE_LARGE_FILES		/**/
?H:?%<:#endif
?H:.
?LINT:set uselargefiles
?LINT:extern use64bits
?LINT:change use64bits

cat <<EOM

Perl can be built to understand large files (files larger than 2 gigabytes)
on some systems.  To do so, Configure must be run with -Duselargefiles.

If this doesn't make any sense to you, just accept the default.
EOM
case "$uselargefiles" in
"$define"|true|[yY]*) dflt='y' ;;
*)	dflt='n' ;;
esac
rp='Try to understand large files?'
. ./myread
case "$ans" in
y|Y) 	val="$define" ;;
*)   	val="$undef"  ;;
esac
set uselargefiles
eval $setvar
case "$uselargefiles" in
"$define") use64bits="$define" ;;
esac