# New Ticket Created by  Victor ADAM 
# Please include the string:  [perl #132327]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=132327 >


How to reproduce
----------------

perl6 -e '$_ = 1e-1 + 2e-1; 3e-1; say $_ == 3e-1'

perl6 -e '$_ = 1e-1 + 2e-1; .3e0; say $_ == 3e-1'

Expected behavior
-----------------

Both scripts should give the same result. If I understand floating-point
handling correctly, they should both print `False`; but both printing `True`
would also seem valid.

Both scripts should warn about the use of a floating-point literal in sink
context.

Actual behavior
---------------

The first script prints `True`. The second script prints `False`.

Both scripts correctly warn: `Useless use of constant floating-point number
0.3 in sink context (line 1)`.

Version information
-------------------

This is Rakudo version 2017.09 built on MoarVM version 2017.09.1
implementing Perl 6.c.

This was discussed (shortly) on IRC:
https://irclog.perlgeek.de/perl6/2017-10-19#i_15324682

Reply via email to