From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Wed, 24 Oct 2001 23:07:00 +0000 (+0000)
Subject: Tru64 compiler nit.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b48e37451f28656e04b70fcad4d165ae76f34688;p=p5sagit%2Fp5-mst-13.2.git

Tru64 compiler nit.

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

diff --git a/ext/threads/shared/shared.xs b/ext/threads/shared/shared.xs
index 9ef9101..bbc6e6e 100644
--- a/ext/threads/shared/shared.xs
+++ b/ext/threads/shared/shared.xs
@@ -588,7 +588,7 @@ DELETE(self, key)
 	tmp = hv_delete((HV*) SHAREDSvGET(shared), ckey, len,0);
 	SHAREDSvRELEASE(shared);
 	if(tmp) {
-		slot = SvIV(tmp);	
+		slot = (shared_sv*) SvIV(tmp);
 		RETVAL = newSVsv(SHAREDSvGET(slot));
 		Perl_sharedsv_thrcnt_dec(aTHX_ slot);
 	} else {