Initial splice implementation for nom

splice.pl

use MONKEY_TYPING;

augment class List {
    method splice($offset = 0, $length = self.elems - $offset, *@rep) {
        self.gimme($offset + $length);
        @rep.gimme(*);
        my @res = self[$offset ... $offset + $length - 1];
        pir::splice__vPPII(
            $!items,
            nqp::getattr(@rep, List, '$!items'),
            nqp::unbox_i($offset.Int),
            nqp::unbox_i($length.Int)
        );
        self;
        @res;
    }
}

my @x = (1, 2, 3);
say @x.splice(1, 1, 'a', 'b', 'c').perl;
say @x.perl;