Branch: refs/heads/blead
  Home:   https://github.com/Perl/perl5
  Commit: 17ad661f846426aa913ce213ba8c8c5a070142e5
      
https://github.com/Perl/perl5/commit/17ad661f846426aa913ce213ba8c8c5a070142e5
  Author: TAKAI Kousuke <62541129+t-...@users.noreply.github.com>
  Date:   2024-08-14 (Wed, 14 Aug 2024)

  Changed paths:
    M toke.c

  Log Message:
  -----------
  scan_num: Remove redundant code for impossible negative number

scan_num() is called to parse tokens beginning with a digit, decimal
point ('.') or 'v' (for v-string) only (otherwise san_num will croak),
and all of such tokens themselves cannot be negative.
Therefore grok_number() never returns IS_NUMBER_NEG, and
`flags == (IS_NUMBER_IN_UV | IS_NUMBER_NEG))` will never happen.

In addition, `if (uv <= IV_MAX) sv = newSViv(uv); else sv = newSVuv(uv);`
was redundant, as newSVuv() will do the same thing.



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

Reply via email to