1 package Moose::Meta::Method::Accessor::Native::Array::Writer;
8 with 'Moose::Meta::Method::Accessor::Native::Writer' => {
9 -excludes => ['_inline_coerce_new_values'],
11 'Moose::Meta::Method::Accessor::Native::Array',
12 'Moose::Meta::Method::Accessor::Native::Collection';
14 sub _new_members { '@_' }
18 my ($slot_access) = @_;
20 return '[ @{(' . $slot_access . ')} ]';