This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
(perl #131725) ignore the exponent on a decimal float if no digits
authorTony Cook <tony@develop-help.com>
Thu, 3 Aug 2017 02:11:56 +0000 (12:11 +1000)
committerTony Cook <tony@develop-help.com>
Mon, 14 Aug 2017 05:38:54 +0000 (15:38 +1000)
commitadb0f5c46e10ac97fd958f4cd5526ea6d4b058f6
tree9c7407d18b168df569e41c3057930054525f9a87
parent7aaa36b196e5a478a3d1bd32506797db7cebf0b2
(perl #131725) ignore the exponent on a decimal float if no digits

Previously the "1e-" in "1e--5" would be treated as "1", but consumed
the "e-".

This wasn't an issue for hex floats.

I considered (and implemented) croaking instead, but this was
inconsistent with the behaviour for hex floats, which only reach this
code if a full hex float has been parsed.
t/lib/croak/toke
toke.c