From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Thu, 29 Nov 2001 20:58:10 +0000 (+0000)
Subject: BGET_IV was missing.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=78c6a0b0e14fa8d041f18b63d7947a043a58bad6;p=p5sagit%2Fp5-mst-13.2.git

BGET_IV was missing.

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

diff --git a/ext/ByteLoader/bytecode.h b/ext/ByteLoader/bytecode.h
index 73f3544..5a779aa 100644
--- a/ext/ByteLoader/bytecode.h
+++ b/ext/ByteLoader/bytecode.h
@@ -72,6 +72,14 @@ typedef IV IV64;
 	}						\
     } STMT_END
 
+#if IVSIZE == 4
+#   define BGET_IV(arg) BGET_I32(arg)
+#else
+#   if IVSIZE == 8
+#       define BGET_IV(arg) BGET_IV64(arg)
+#   endif
+#endif
+
 #define BGET_op_tr_array(arg) do {			\
 	unsigned short *ary;				\
 	New(666, ary, 256, unsigned short);		\