On Mon, 25 Dec 2017 11:44:23 GMT, davem wrote: > On Sat, Dec 23, 2017 at 04:11:25AM -0800, Andreas J. Koenig via RT > wrote: > > commit bcc30fd0276e8f6d4ac27d6f4c719b70a266b1fc > > Author: David Mitchell <davem@iabyn.com> > > Date: Mon Dec 4 11:50:53 2017 +0000 > > > > multiconcat: don't fold adjacent constants > > > > diagnostics > > ----------- > > http://www.cpantesters.org/cpan/report/82741a38-d967-11e7-9af2- > > f32bb5d65ef4 > > Now fixed: > > commit f08f2d0393c6f2ccdfc17ed791cd9956d95eaa4e > Author: David Mitchell <davem@iabyn.com> > AuthorDate: Mon Dec 25 10:40:58 2017 +0000 > Commit: David Mitchell <davem@iabyn.com> > CommitDate: Mon Dec 25 11:21:07 2017 +0000 > > mutlitconcat: fix non-folding adjacent consts > > RT ##132646 > > v5.27.6-120-gbcc30fd changed multiconcat so that adjacent constants > weren't folded, so that ($overloaded . "a" . "b") is invoked as > $overloaded->concat("a")->concat("b") > rather than > $overloaded->concat("ab") > > It did this by 'demoting' every second adjacent const as a real arg > rather > than adding it to the const string. However, that could leave a > multiconcat op with more than the maximum allowed args. > > So include demotion candidates as part of the arg count. Confirmed. ##### $ ./bin/perl -v | head -2 | tail -1 This is perl 5, version 27, subversion 8 (v5.27.8 (v5.27.7-49-gf08f2d0)) built for x86_64-linux $ ./bin/cpanm Data::Printer [snip] Building and testing Data-Printer-0.40 ... OK Successfully installed Data-Printer-0.40 14 distributions installed ##### -- James E Keenan (jkeenan@cpan.org) --- via perlbug: queue: perl5 status: open https://rt.perl.org/Ticket/Display.html?id=132646Thread Previous