From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 31 Jul 2003 19:46:14 +0000 (+0000)
Subject: (retracted by #20390)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2431d1a8b08d9439dfd88cbfe40fc021749b2412;p=p5sagit%2Fp5-mst-13.2.git

(retracted by #20390)

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

diff --git a/ext/ByteLoader/bytecode.h b/ext/ByteLoader/bytecode.h
index bd62b28..8ef6d38 100644
--- a/ext/ByteLoader/bytecode.h
+++ b/ext/ByteLoader/bytecode.h
@@ -172,10 +172,8 @@ typedef char *pvindex;
 
 #define BSET_newsv(sv, arg)				\
 	STMT_START {					\
-	    sv = (arg == SVt_PVAV ? (SV*)newAV() :	\
-		  arg == SVt_PVHV ? (SV*)newHV() :	\
-		  NEWSV(666,0));			\
-	    SvUPGRADE(sv, arg);				\
+	    sv = NEWSV(0,0));				\
+	    SvUPGRADE(sv, (arg));			\
 	} STMT_END
 #define BSET_newsvx(sv, arg) STMT_START {		\
 	    BSET_newsv(sv, arg &  SVTYPEMASK);		\