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