FAQ
I would propose the following change to weed out 5005threads from Configure.

Any remarks? (unified diff attached)

==== //depot/metaconfig/U/threads/usethreads.U#15 - /pro/3gl/CPAN/metaconfig/U/threads/usethreads.U ====
10c10
< ?MAKE:usethreads useithreads use5005threads d_oldpthreads usereentrant: \
---
?MAKE:usethreads useithreads d_oldpthreads usereentrant: \
23,27d22
< ?S:use5005threads:
< ?S: This variable conditionally defines the USE_5005THREADS symbol,
< ?S: and indicates that Perl should be built to use the 5.005-based
< ?S: threading implementation.
< ?S:.
48,51d42
< ?C:USE_5005THREADS:
< ?C: This symbol, if defined, indicates that Perl should be built to
< ?C: use the 5.005-based threading implementation.
< ?C:.
55c46
< ?C: USE_5005THREADS, but eventually the source ought to be changed
---
?C: USE_ITHREADS, but eventually the source ought to be changed
67d57
< ?H:#$use5005threads USE_5005THREADS /**/
69,71d58
< ?H:?%<:#if defined(USE_5005THREADS) && !defined(USE_ITHREADS)
< ?H:?%<:#define USE_THREADS /* until src is revised*/
< ?H:?%<:#endif
75c62
< ?LINT:set usethreads useithreads use5005threads d_oldpthreads usereentrant
---
?LINT:set usethreads useithreads d_oldpthreads usereentrant
83c70
< *) # Catch case where user specified ithreads or 5005threads but
---
*) # Catch case where user specified ithreads but
85,86c72,73
< case "$useithreads$use5005threads" in
< *$define*)
---
case "$useithreads" in
*$define*)
119c106,109
< $cat <<EOM
---
dflt='y'
case "$useithreads" in
$undef|false|[nN]*)
$cat >&4 <<EOM
121,127c111,113
< Since release 5.6, Perl has had two different threading implementations,
< the newer interpreter-based version (ithreads) with one interpreter per
< thread, and the older 5.005 version (5005threads).
< The 5005threads version is effectively unmaintained and will probably be
< removed in Perl 5.10, so there should be no need to build a Perl using it
< unless needed for backwards compatibility with some existing 5.005threads
< code.
---
Whoa there. You have selected -Dusethreads, but somehow explicitely
disabled using threads with -Uuseithreads, either from a previous
config.sh or a command line option.
128a115,116
I will disable threads altogether.

130,150c118,120
< : Default to ithreads unless overridden on command line or with
< : old config.sh
< dflt='y'
< case "$use5005threads" in
< $define|true|[yY]*) dflt='n';;
< esac
< case "$useithreads" in
< $undef|false|[nN]*) dflt='n';;
< esac
< rp='Use the newer interpreter-based ithreads?'
< . ./myread
< case "$ans" in
< y|Y) val="$define" ;;
< *) val="$undef" ;;
< esac
< set useithreads
< eval $setvar
< : Now set use5005threads to the opposite value.
< case "$useithreads" in
< $define) val="$undef" ;;
< *) val="$define" ;;
---
usethreads=$undef
sleep 10
;;
152,154d121
< set use5005threads
< eval $setvar
< ;;
157,171d123
< use5005threads="$undef"
< ;;
< esac
<
< ?X: This is not supposed to be possible but with some trickery, maybe.
< case "$useithreads$use5005threads" in
< "$define$define")
< $cat >&4 <<EOM
<
< You cannot have both the ithreads and the 5.005 threads enabled
< at the same time. Disabling the 5.005 threads since they are
< much less stable than the ithreads.
<
< EOM
< use5005threads="$undef"

--
H.Merijn Brand Amsterdam Perl Mongers (http://amsterdam.pm.org/)
using perl-5.6.1, 5.8.0 & 633 on HP-UX 10.20 & 11.00, AIX 4.2, AIX 4.3,
WinNT 4, Win2K pro & WinCE 2.11. Smoking perl CORE: smokers@perl.org
http://archives.develooper.com/daily-build@perl.org/ perl-qa@perl.org
send smoke reports to: smokers-reports@perl.org, QA: http://qa.perl.org

Search Discussions

Discussion Posts

Follow ups

Related Discussions

Discussion Navigation
viewthread | post
posts ‹ prev | 1 of 4 | next ›
Discussion Overview
groupperl5-build @
categoriesperl
postedNov 4, '02 at 5:39p
activeNov 5, '02 at 2:45p
posts4
users2
websiteperl.org

People

Translate

site design / logo © 2019 Grokbase