summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2005-05-17 12:28:18 +0100
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-05-18 12:46:38 +0000
commit37ac43f5c5f6dad25a2bfe9c2dd1d819478704a5 (patch)
treef33dc405b995ff3811080a1830500b4cbb050e25
parentf47304e935f606e534d07025226f74138a95070d (diff)
downloadperl-37ac43f5c5f6dad25a2bfe9c2dd1d819478704a5.tar.gz
B::Disassembler.pm
Message-ID: <20050517102817.GD94420@plum.flirble.org> p4raw-id: //depot/perl@24499
-rw-r--r--ext/B/B/Disassembler.pm10
1 files changed, 5 insertions, 5 deletions
diff --git a/ext/B/B/Disassembler.pm b/ext/B/B/Disassembler.pm
index c64b9734c1..e1993aa953 100644
--- a/ext/B/B/Disassembler.pm
+++ b/ext/B/B/Disassembler.pm
@@ -5,7 +5,7 @@
# You may distribute under the terms of either the GNU General Public
# License or the Artistic License, as specified in the README file.
-$B::Disassembler::VERSION = '1.04';
+$B::Disassembler::VERSION = '1.05';
package B::Disassembler::BytecodeStream;
@@ -154,12 +154,12 @@ sub GET_IV {
$Config{ivsize} == 4 ? &GET_I32 : &GET_IV64;
}
-sub B::::GET_PADOFFSET {
- $Config{ptrsize} == 8 ? &B::GET_IV64 : &B::GET_U32;
+sub GET_PADOFFSET {
+ $Config{ptrsize} == 8 ? &GET_IV64 : &GET_U32;
}
-sub B::::GET_long {
- $Config{longsize} == 8 ? &B::GET_IV64 : &B::GET_U32;
+sub GET_long {
+ $Config{longsize} == 8 ? &GET_IV64 : &GET_U32;
}