[perl #126022] [BUG] .base method works incorrectly with low $digits values

[via RT]

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


[7:51pm] labster: m: 1.5e0.base(10, -1).say
[7:51pm] camelia: rakudo-moar 10dcba: OUTPUT«2␤»
[7:51pm] labster: m: 1.base(10, -1).say
[7:51pm] camelia: rakudo-moar 10dcba: OUTPUT«1.␤»
[7:52pm] labster: m: (3/2).base(10, -1).say
[7:52pm] camelia: rakudo-moar 10dcba: OUTPUT«Index out of range. Is: -1,
should be in 0..Inf␤  in block <unit> at /tmp/8pBvED6LJ6:1␤␤Actually thrown
at:␤  in any  at src/gen/m-Metamodel.nqp:2869␤  in block <unit> at
/tmp/8pBvED6LJ6:1␤␤»
[7:52pm] labster: oddly enough, it's the last one that's closest to spec.
[8:00pm] labster: m: say (98/99).base(10, 1)
[8:00pm] camelia: rakudo-moar 10dcba: OUTPUT«010.0␤»
[8:00pm] labster: right, so I already have a fix for that one, but I'm
going to rakudobug this so I can get a tracking ticket