Branch: refs/heads/davem/deparse
  Home:   https://github.com/Perl/perl5
  Commit: cd61e295d54f9c31ae05074b2da91407506216c9
      
https://github.com/Perl/perl5/commit/cd61e295d54f9c31ae05074b2da91407506216c9
  Author: David Mitchell <da...@iabyn.com>
  Date:   2025-04-28 (Mon, 28 Apr 2025)

  Changed paths:
    M lib/B/Deparse.pm
    M lib/B/Deparse.t

  Log Message:
  -----------
  Deparse: fix 3-arg susbtr_left deparsing

v5.41.7-43-gcdbed2a40e introduced the OP_SUBSTR_LEFT op,
which is an optimised version of OP_SUBSTR for when the offset
is zero and the replacement string is missing or ''.

Unfortunately the deparsing for this OP missed out the closing
parenthesis when the replacement string wasn't present; i.e.:

    substr($lex, 0, 4);

deparsed as:

    substr($lex, 0, 4;

The fix is trivial.


  Commit: 436137b23f10e2401bfe37682d3e8299cbb78fe0
      
https://github.com/Perl/perl5/commit/436137b23f10e2401bfe37682d3e8299cbb78fe0
  Author: David Mitchell <da...@iabyn.com>
  Date:   2025-04-28 (Mon, 28 Apr 2025)

  Changed paths:
    M Porting/deparse-skips.txt

  Log Message:
  -----------
  Deparse: exclude two new test files

Add a couple of recently-added test files to

    Porting/deparse-skips.txt

These two test files have

    use utf8;
    "some string with accented chars"

and the accented char gets deparsed wrongly at the moment.
So skip those test files under

    cd t; ./TEST -deparse


Compare: https://github.com/Perl/perl5/compare/cd61e295d54f%5E...436137b23f10

To unsubscribe from these emails, change your notification settings at 
https://github.com/Perl/perl5/settings/notifications

Reply via email to