This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Part 2 of a big cleanup action based on the upcoming dist-4.0
[metaconfig.git] / U / perl / mad.U
CommitLineData
5648e28d
MB
1?RCS: $Id: mad.U,v $
2?RCS:
3?RCS: Copyright (c) 2006 H.Merijn Brand, Nicholas Clark
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?RCS: $Log: mad.U,v $
9?RCS:
8a40640e 10?MAKE:mad madlyh madlyobj madlysrc: Myread Setvar _o test patchlevel
5648e28d
MB
11?MAKE: -pick add $@ %<
12?S:mad:
13?S: This variable indicates that the Misc Attribute Definition code is to
14?S: be compiled.
15?S:.
ac53d95c
MB
16?S:madlyh:
17?S: If the Misc Attribute Decoration is to be compiled, this variable is
18?S: set to the name of the extra header files to be used, else it is ''
19?S:.
20?S:madlyobj:
21?S: If the Misc Attribute Decoration is to be compiled, this variable is
22?S: set to the name of the extra object files to be used, else it is ''
23?S:.
24?S:madlysrc:
25?S: If the Misc Attribute Decoration is to be compiled, this variable is
26?S: set to the name of the extra C source files to be used, else it is ''
27?S:.
5648e28d
MB
28?C:PERL_MAD:
29?C: This symbol, if defined, indicates that the Misc Attribution
30?C: Declaration code should be conditionally compiled.
31?C:.
32?H:#$mad PERL_MAD /**/
33?H:.
8a40640e 34?T:ans
ac53d95c 35?LINT:set mad madlyh madlyobj madlysrc
5648e28d 36
8a40640e
MB
37if $test $patchlevel -lt 9; then
38: MAD is not available in 5.8.x or earlier.
39 ans=n;
40else
41 case "$mad" in
42 $define|true|[yY]*) dflt='y' ;;
43 *) dflt='n' ;;
44 esac
45 cat <<EOM
5648e28d
MB
46
47Would you like to build with Misc Attribute Decoration? This is development
48work leading to a Perl 5 to Perl 6 convertor, which imposes a space and speed
49overhead on the interpreter.
50
51If this doesn't make any sense to you, just accept the default '$dflt'.
52EOM
8a40640e
MB
53 rp='Build Perl with MAD?'
54 . ./myread
55fi
5648e28d 56case "$ans" in
ac53d95c
MB
57y|Y) val="$define"
58 madlyh='madly.h madly.act madly.tab'
59 madlysrc='madly.c'
60 madlyobj="madly$_o" ;;
61*) val="$undef"
62 madlyh=''
63 madlysrc=''
64 madlyobj='' ;;
5648e28d
MB
65esac
66set mad
67eval $setvar
68