remove unused B::OP::safenext - pause indexer problem

rurban · Sep 8, 2011 · cd02f23 · cd02f23
1 parent 29e2be5
commit cd02f23
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 2 deletions.
diff --git a/Changes b/Changes
@@ -1,5 +1,8 @@
 Revision history for Perl extension optimize
 
+0.05 2011-09-08 rurban
+    - remove unused B::OP::safenext - pause indexer problem
+
 0.04 2011-09-07 rurban
     - remove B::Hooks::EndOfScope::on_scope_end dependency, not needed
     - fix threaded (const PV->GV): tests pass now, only some older perls fail.

diff --git a/lib/optimize.pm b/lib/optimize.pm
@@ -7,7 +7,7 @@ use B::Utils qw(walkallops_simple);
 use B qw(OPf_KIDS OPf_MOD OPf_PARENS OPf_WANT_SCALAR OPf_STACKED);
 use Attribute::Handlers;
 
-our $VERSION = "0.04";
+our $VERSION = "0.05";
 
 our $DEBUG = 0;
 our %pads;
@@ -17,7 +17,6 @@ our $stash = '';
 our %register;
 
 sub dbgprint { print @_ if $DEBUG; }
-sub B::OP::safenext { $_[0]->can('next') ? $_[0]->next : bless { next => 0 }, "B::OP" }
 
 use optimizer "extend-c" => sub {
     my $op = shift;