From: Spider Boardman <spider@orb.nashua.nh.us>
Date: Thu, 25 Dec 1997 13:39:15 +0000 (-0500)
Subject: 5.004_56 threaded and "CONFIG key 'exe_ext' does not exist in Config.pm"
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=982fa0b99bd3e50eaadd172e08c0a8e5cc2bdfc6;p=p5sagit%2Fp5-mst-13.2.git

5.004_56 threaded and "CONFIG key 'exe_ext' does not exist in Config.pm"
To: perl5-porters@perl.org

It turns out that the potential for the "CONFIG key 'exe_ext'
does not exist in Config.pm" problem has been around for a while,
in the definition of SvTRUE().  It's just that non-gcc compilers
are more or less being built as CRIPPLED_CC when USE_THREADS is
defined (even if they can inline things).  The inline macro for
SvTRUE works with tied hashes and the EXISTS method, and the
functional version (sv_true in 5.004_56, or SvTRUE in 5.004_04)
does not, because it adds an excess mg_get() which replaces the
EXISTS result with a FETCH result.

p4raw-id: //depot/ansiperl@429
---

diff --git a/sv.c b/sv.c
index 0371100..196d08c 100644
--- a/sv.c
+++ b/sv.c
@@ -3703,8 +3703,6 @@ sv_true(register SV *sv)
     dTHR;
     if (!sv)
 	return 0;
-    if (SvGMAGICAL(sv))
-	mg_get(sv);
     if (SvPOK(sv)) {
 	register XPV* tXpv;
 	if ((tXpv = (XPV*)SvANY(sv)) &&