Re: script wanted

Message-ID: <20030813193118.GA1273@ratsnest.hole>

p4raw-id: //depot/perl@20685

diff --git a/bytecode.pl b/bytecode.pl
index 68167e1..e3104af 100644 (file)
--- a/bytecode.pl
+++ b/bytecode.pl
@@ -46,7 +46,7 @@ open(ASMDATA_PM, ">ext/B/B/Asmdata.pm") or die "ext/B/B/Asmdata.pm: $!";
 print ASMDATA_PM $perl_header, <<'EOT';
 package B::Asmdata;
 
-our $VERSION = '1.00';
+our $VERSION = '1.01';
 
 use Exporter;
 @ISA = qw(Exporter);

diff --git a/ext/B/B/Asmdata.pm b/ext/B/B/Asmdata.pm
index 21b3364..12646fc 100644 (file)
--- a/ext/B/B/Asmdata.pm
+++ b/ext/B/B/Asmdata.pm
@@ -10,7 +10,7 @@
 #
 package B::Asmdata;
 
-our $VERSION = '1.00';
+our $VERSION = '1.01';
 
 use Exporter;
 @ISA = qw(Exporter);

diff --git a/ext/B/B/Assembler.pm b/ext/B/B/Assembler.pm
index 31a8e92..afbd338 100644 (file)
--- a/ext/B/B/Assembler.pm
+++ b/ext/B/B/Assembler.pm
@@ -16,7 +16,7 @@ no warnings;                  # XXX
 
 @ISA = qw(Exporter);
 @EXPORT_OK = qw(assemble_fh newasm endasm assemble asm);
-$VERSION = 0.04;
+$VERSION = 0.05;
 
 use strict;
 my %opnumber;

diff --git a/ext/B/B/Disassembler.pm b/ext/B/B/Disassembler.pm
index 65e2f40..d097445 100644 (file)
--- a/ext/B/B/Disassembler.pm
+++ b/ext/B/B/Disassembler.pm
@@ -6,7 +6,7 @@
 #      License or the Artistic License, as specified in the README file.
 package B::Disassembler::BytecodeStream;
 
-our $VERSION = '1.01';
+our $VERSION = '1.02';
 
 use FileHandle;
 use Carp;