This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fix .gitignore: only ignore 'perl' in root of repo, not U/perl subdir
[metaconfig.git] / U / perl / usequadmath.U
CommitLineData
63a4f1f4
MBT
1?RCS: You may distribute under the terms of either the GNU General Public
2?RCS: License or the Artistic License, as specified in the README file.
3?RCS:
7253d5da 4?MAKE:usequadmath: Setvar cat uselongdouble
63a4f1f4
MBT
5?MAKE: -pick add $@ %<
6?S:usequadmath:
7?S: This variable conditionally defines the USE_QUADMATH symbol,
8?S: and indicates that the quadmath library __float128 long doubles
9?S: should be used when available.
10?S:.
11?C:USE_QUADMATH:
12?C: This symbol, if defined, indicates that the quadmath library should
13?C: be used when available.
14?C:.
15?H:?%<:#ifndef USE_QUADMATH
16?H:?%<:#$usequadmath USE_QUADMATH /**/
17?H:?%<:#endif
18?H:.
19: Check if quadmath is requested
20case "$usequadmath" in
21"$define"|true|[yY]*) usequadmath="$define" ;;
22*) usequadmath="$undef" ;;
23esac
24
7253d5da
MBT
25: Fail if both uselongdouble and usequadmath are requested
26case "$usequadmath:$uselongdouble" in
27define:define)
28 $cat <<EOM >&4
29
30*** You requested the use of the quadmath library and use
31*** of long doubles.
32***
33*** Please select one or the other.
34EOM
35 exit 1
36 ;;
37esac
38