This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Oops. Change 27826 had an error in the definition of BGET_PADOFFSET().
authorNicholas Clark <nick@ccl4.org>
Mon, 17 Apr 2006 16:52:07 +0000 (16:52 +0000)
committerNicholas Clark <nick@ccl4.org>
Mon, 17 Apr 2006 16:52:07 +0000 (16:52 +0000)
p4raw-id: //depot/perl@27874

ext/ByteLoader/bytecode.h

index 0dceac4..50198ec 100644 (file)
@@ -25,8 +25,8 @@ typedef char *pvindex;
 #define BGET_U16(arg)          BGET_OR_CROAK(arg, U16)
 #define BGET_I32(arg)          BGET_OR_CROAK(arg, U32)
 #define BGET_U32(arg)          BGET_OR_CROAK(arg, U32)
-#define BGET_IV(arg)           BGET_OR_CROAK(arg, UV)
-#define BGET_PADOFFSET(arg)    BGET_OR_CROAK(arg, UV)
+#define BGET_IV(arg)           BGET_OR_CROAK(arg, IV)
+#define BGET_PADOFFSET(arg)    BGET_OR_CROAK(arg, PADOFFSET)
 #define BGET_long(arg)         BGET_OR_CROAK(arg, long)
 
 #define BGET_OR_CROAK(arg, type) STMT_START {                          \