Permalink
Browse files

fix 5.15: set CopARYBASE_get(PL_curcop) to 0 (there is no ppport for …

…this)
  • Loading branch information...
1 parent 1110bcd commit 7ea1c4c4545d100bf32bbe1a560de033930cb4a7 @rurban committed Feb 28, 2012
Showing with 8 additions and 1 deletion.
  1. +3 −0 Changes
  2. +1 −1 optimizer.pm
  3. +4 −0 optimizer.xs
View
3 Changes
@@ -1,5 +1,8 @@
Revision history for Perl extension optimizer.
+0.08 2012-02-28 <rurban@cpan.org>
+ - for 5.15 set CopARYBASE_get(PL_curcop) to 0 (there's no ppport for this)
+
0.07 2011-09-02 Reini Urban <rurban@cpan.org>
- prepend "_" to private subs
- disable relocatetopad as the op_sv is wrong and the cv looks strange
View
2 optimizer.pm
@@ -23,7 +23,7 @@ BEGIN {
}
require DynaLoader;
-our $VERSION = '0.07';
+our $VERSION = '0.08';
our @ISA = q(DynaLoader);
our %callbacks;
bootstrap optimizer $VERSION;
View
4 optimizer.xs
@@ -338,7 +338,11 @@ c_extend_peep(pTHX_ register OP *o)
#if PERL_VERSION < 10
PL_curcop->cop_arybase
#else
+# if PERL_VERSION < 15
CopARYBASE_get(PL_curcop)
+# else
+ 0
+# endif
#endif
) <= 255 &&
i >= 0)

0 comments on commit 7ea1c4c

Please sign in to comment.