[perl #130290] [REGRESSION] Weird behavior due to overflow when indexing from the back (@a[*-9999999999999999999]:delete)

[via RT]

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


Code:
my @a = <a b c>; @a[*-18446744073709551616]:delete; say @a


Result (2015.12):
Calculated index (-18446744073709551613) is negative, but Array allows only 
0-based indexing
  in block <unit> at /tmp/g0zjzkXIcV line 1

Actually thrown at:
  in block <unit> at /tmp/g0zjzkXIcV line 1


Result (HEAD):
[a b c]



Code:
my @a = <a b c>; @a[*-18446744073709551617]:delete; say @a


Result (2015.12):
Calculated index (-18446744073709551614) is negative, but Array allows only 
0-based indexing
  in block <unit> at /tmp/nlSDRWGjik line 1

Actually thrown at:
  in block <unit> at /tmp/nlSDRWGjik line 1


Result (HEAD):
[a b]



Code:
my @a = <a b c>; @a[*-18446744073709551618]:delete; say @a


Result (2015.12):
Calculated index (-18446744073709551615) is negative, but Array allows only 
0-based indexing
  in block <unit> at /tmp/3LuNBo60du line 1

Actually thrown at:
  in block <unit> at /tmp/3LuNBo60du line 1


Result (HEAD):
[a (Any) c]




While the error messages were a bit LTA, at least it was throwing an error.

Bisectable points to this commit: 
https://github.com/rakudo/rakudo/commit/6dbacb34525dcdd20526c7bbae43c6aedc566a19