From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 31 Jul 2003 20:22:03 +0000 (+0000)
Subject: Enache again.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1d22e8bc9ebf27719af3f2b3ce4e27ba05dcf85a;p=p5sagit%2Fp5-mst-13.2.git

Enache again.

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

diff --git a/ext/ByteLoader/bytecode.h b/ext/ByteLoader/bytecode.h
index bd62b28..165e67a 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);		\