From: H.Merijn Brand <h.m.brand@xs4all.nl>
Date: Wed, 19 Sep 2001 11:45:28 +0000 (+0200)
Subject: Re: [PATCH] Smoke 12057 /pro/3gl/CPAN/perl-current
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=a86deb9aacaac2099a8928c04c26b6d616aea181;p=p5sagit%2Fp5-mst-13.2.git

Re: [PATCH] Smoke 12057 /pro/3gl/CPAN/perl-current
Message-Id: <20010919110037.19C7.H.M.BRAND@hccnet.nl>

Lvalue casts are not portable.

p4raw-id: //depot/perl@12082
---

diff --git a/ext/threads/threads.xs b/ext/threads/threads.xs
index d74a198..09387ba 100755
--- a/ext/threads/threads.xs
+++ b/ext/threads/threads.xs
@@ -297,7 +297,7 @@ BOOT:
 	PL_perl_destruct_level = 2;
 	threads = Perl_sharedsv_new(aTHX);
 	SHAREDSvEDIT(threads);
-	((HV*) SHAREDSvGET(threads)) = newHV();
+	SHAREDSvGET(threads) = (SV *)newHV();
 	SHAREDSvRELEASE(threads);
 	{