Shaped native arrays with negative sizes (my int @a[-9999999999999999])

[p6rt]

Migrated from rt.perl.org#131966 (status was 'new')

Searchable as RT131966$

[p6rt]

From @AlexDaniel

Code​:
my int @​x[-2**63];
say +@​x

Result​:
-9223372036854775808

See RT #​126800 for exactly the same issue with non-native arrays​: https://rt-archive.perl.org/perl6/Ticket/Display.html?id=126800

[p6rt]

From @AlexDaniel

Actually, it is a regression.

Code​:
my int @​x[-2**63]; say @​x.shape

¦«2015.12»​:
(-9223372036854775808)

¦«2016.06»​:
Illegal dimension in shape​: -9223372036854775808. All dimensions must be integers bigger than 0
  in block <unit> at /home/bisectable/git/whateverable/data/regressionable/15074816/snippet line 1
 «exit code = 1»

¦«2016.12»​:
(-9223372036854775808)

¦«2017.06»​:
(-9223372036854775808)

¦«f72be0f130cf»​:
(-9223372036854775808)

Possible IRC discussion​: https://irclog.perlgeek.de/perl6-dev/2017-08-26#i_15074816

So it was first fixed in
(2016-04-09) rakudo/rakudo@46dca95

and the accidentally broken in
(2016-11-24) rakudo/rakudo@1b840f1

On 2017-08-26 16​:43​:20, alex.jakimenko@​gmail.com wrote​:

Code​:
my int @​x[-2**63];
say +@​x

Result​:
-9223372036854775808

See RT #​126800 for exactly the same issue with non-native arrays​:
https://rt-archive.perl.org/perl6/Ticket/Display.html?id=126800