Bug #101070 for B-Generate: Compilation error with perl 5.21.7

Sun Dec 21 14:52:59 2014 SREZIC [...] cpan.org - Ticket created

Subject:

Compilation error with perl 5.21.7

See http://matrix.cpantesters.org/?dist=B-Generate;perl=5.21.7;reports=1#sl=7,1 for a reports overview.

Mon Dec 22 02:01:25 2014 $_ = 'spro^^*%*^6ut# [...] &$%*c>#!^!#&!pan.org'; y/a-z.@//cd; print - Correspondence added

On Sun Dec 21 14:52:59 2014, SREZIC wrote: Show quoted text

> See http://matrix.cpantesters.org/?dist=B- > Generate;perl=5.21.7;reports=1#sl=7,1 for a reports overview.

Patch.

Subject:

open_dUl2cJZa.txt

diff -rup B-Generate-1.49-9snyD6/Generate.xs B-Generate-1.49-m0nGGk/Generate.xs --- B-Generate-1.49-9snyD6/Generate.xs 2014-08-08 15:04:10.000000000 -0700 +++ B-Generate-1.49-m0nGGk/Generate.xs 2014-12-21 22:57:55.000000000 -0800 @@ -51,6 +51,7 @@ typedef AV PAD; # define PadlistARRAY(pl) ((PAD **)AvARRAY(pl)) # define PadlistNAMES(pl) (*PadlistARRAY(pl)) # define PadARRAY AvARRAY +# define PadnamelistMAX AvFILLp #endif #ifndef SvIS_FREED @@ -156,7 +157,7 @@ HV* root_cache; if ( my_curr_cv) { \ PL_comppad = PadlistARRAY(CvPADLIST(my_curr_cv))[1]; \ PL_comppad_name = PadlistNAMES(CvPADLIST(my_curr_cv)); \ - PL_padix = AvFILLp(PL_comppad_name); \ + PL_padix = PadnamelistMAX(PL_comppad_name); \ PL_pad_reset_pending = 0; \ } \ PL_curpad = AvARRAY(PL_comppad); \ @@ -731,7 +732,7 @@ OP_targ(o, ...) PL_comppad = PadlistARRAY(padlist)[1]; PL_curpad = AvARRAY(PL_comppad); - PL_padix = AvFILLp(PL_comppad_name); + PL_padix = PadnamelistMAX(PL_comppad_name); PL_pad_reset_pending = 0; /* <medwards> PL_comppad_name_fill appears irrelevant as long as you stick to pad_alloc, pad_swipe, pad_free. diff -rup B-Generate-1.49-9snyD6/t/op_list.t B-Generate-1.49-m0nGGk/t/op_list.t --- B-Generate-1.49-9snyD6/t/op_list.t 2013-09-30 08:52:53.000000000 -0700 +++ B-Generate-1.49-m0nGGk/t/op_list.t 2014-12-21 22:59:59.000000000 -0800 @@ -12,6 +12,7 @@ use_ok 'B'; # release-dependent values, which we reverify using B-Gen in 2nd test my %list_nums = ( + 150 => "5.021007", # added multideref 149 => "5.019004", # added kvaslice, kvhslice 148 => "5.017006", # added padrange 147 => "5.017004", # removed boolkeys

Mon Dec 22 02:01:26 2014 The RT System itself - Status changed from 'new' to 'open'

Wed Dec 24 07:37:05 2014 RURBAN [...] cpan.org - Correspondence added

Thanks, fixed with 5.10 -- Reini Urban

Wed Dec 24 07:37:13 2014 RURBAN [...] cpan.org - Status changed from 'open' to 'resolved'

Wed Dec 24 07:37:19 2014 RURBAN [...] cpan.org - Correspondence added

Thanks, fixed with 1.50 -- Reini Urban