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


$ perl6 -e'my int $i = int.Range.min; say $i; say $i +> 16'
-9223372036854775808
-140737488355328
$ perl6 -e'my int $i = int.Range.min; say $i; say $i +> 32'
-9223372036854775808
-2147483648
$ perl6 -e'my int $i = int.Range.min; say $i; say $i +> 63'
-9223372036854775808
-1
$ perl6 -e'my int $i = int.Range.min; say $i; say $i +> 64'
-9223372036854775808
-9223372036854775808                                           <===== plain 
wrong
$ perl6 -e'my int $i = int.Range.min; say $i; say $i +> -32'
-9223372036854775808
-39614081257132168796771975168
$ perl6 -e'my int $i = int.Range.min; say $i; say $i +> -64'
-9223372036854775808
-170141183460469231731687303715884105728

$ perl6 -e'my int $i = int.Range.max; say $i; say $i +> 16'
9223372036854775807
140737488355327
$ perl6 -e'my int $i = int.Range.max; say $i; say $i +> 32'
9223372036854775807
2147483647
$ perl6 -e'my int $i = int.Range.max; say $i; say $i +> 63'
9223372036854775807
0
$ perl6 -e'my int $i = int.Range.max; say $i; say $i +> 64'
9223372036854775807
9223372036854775807                                            <= PLAIN WRONG
$ perl6 -e'my int $i = int.Range.max; say $i; say $i +> -2'
9223372036854775807
36893488147419103228
$ perl6 -e'my int $i = int.Range.max; say $i; say $i +> -32'
9223372036854775807
39614081257132168792477007872
$ perl6 -e'my int $i = int.Range.max; say $i; say $i +< 2'
9223372036854775807
-4                                                             <= WHAT?
$ perl6 -e'my int $i = int.Range.max; say $i; say $i +< -2'
9223372036854775807
2305843009213693951

Reply via email to