Sha256: 7e0ef592593be060d9630b122bee4467568fa0a55ab955b76521285d9f130cd6
Contents?: true
Size: 650 Bytes
Versions: 14
Compression:
Stored size: 650 Bytes
Contents
package Moose::Meta::Method::Accessor::Native::Array::unshift;
our $VERSION = '2.2206';
use strict;
use warnings;
use Moose::Role;
with 'Moose::Meta::Method::Accessor::Native::Array::Writer';
sub _adds_members { 1 }
sub _potential_value {
my $self = shift;
my ($slot_access) = @_;
return '[ @_, @{ (' . $slot_access . ') } ]';
}
sub _inline_optimized_set_new_value {
my $self = shift;
my ($inv, $new, $slot_access) = @_;
return 'unshift @{ (' . $slot_access . ') }, @_;';
}
sub _return_value {
my $self = shift;
my ($slot_access) = @_;
return 'scalar @{ (' . $slot_access . ') }';
}
no Moose::Role;
1;
Version data entries
14 entries across 7 versions & 1 rubygems