# 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