Commit | Line | Data |
---|---|---|
959f3c4c JH |
1 | ?RCS: $Id$ |
2 | ?RCS: | |
3 | ?RCS: Copyright (c) 1998 Jarkko Hietaniemi | |
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: | |
edd6115f | 8 | ?MAKE:usemultiplicity: useithreads Myread Oldconfig Setvar |
959f3c4c JH |
9 | ?MAKE: -pick add $@ %< |
10 | ?Y:TOP | |
11 | ?S:usemultiplicity: | |
12 | ?S: This variable conditionally defines the MULTIPLICITY symbol, | |
13 | ?S: and indicates that Perl should be built to use multiplicity. | |
14 | ?S:. | |
15 | ?C:MULTIPLICITY: | |
16 | ?C: This symbol, if defined, indicates that Perl should | |
17 | ?C: be built to use multiplicity. | |
18 | ?C:. | |
d088635c | 19 | ?H:?%<:#ifndef MULTIPLICITY |
a38738d1 JH |
20 | ?H:?%<:#$usemultiplicity MULTIPLICITY /**/ |
21 | ?H:?%<:#endif | |
959f3c4c JH |
22 | ?H:. |
23 | ?LINT:set usemultiplicity | |
24 | ?INIT:: set usemultiplicity on the Configure command line to enable multiplicity. | |
2f125bce | 25 | : Check if multiplicity is required |
959f3c4c JH |
26 | ?X: We should really have some explanatory text here, and some |
27 | ?X: automatic setting of sensible defaults. | |
28 | cat <<EOM | |
29 | ||
30 | Perl can be built so that multiple Perl interpreters can coexist | |
edd6115f JH |
31 | within the same Perl executable. |
32 | EOM | |
959f3c4c | 33 | |
edd6115f JH |
34 | case "$useithreads" in |
35 | $define) | |
36 | cat <<EOM | |
37 | This multiple interpreter support is required for interpreter-based threads. | |
959f3c4c | 38 | EOM |
edd6115f JH |
39 | val="$define" |
40 | ;; | |
635fdf3e | 41 | *) case "$usemultiplicity" in |
edd6115f JH |
42 | $define|true|[yY]*) dflt='y';; |
43 | *) dflt='n';; | |
44 | esac | |
0fdea05a | 45 | echo " " |
635fdf3e | 46 | echo "If this doesn't make any sense to you, just accept the default '$dflt'." |
edd6115f JH |
47 | rp='Build Perl for multiplicity?' |
48 | . ./myread | |
49 | case "$ans" in | |
50 | y|Y) val="$define" ;; | |
51 | *) val="$undef" ;; | |
52 | esac | |
53 | ;; | |
959f3c4c JH |
54 | esac |
55 | set usemultiplicity | |
edd6115f | 56 | eval $setvar |
959f3c4c | 57 |