1 package Moose::Meta::Method::Accessor::Native::Hash::accessor;
7 $VERSION = eval $VERSION;
8 our $AUTHORITY = 'cpan:STEVAN';
12 with 'Moose::Meta::Method::Accessor::Native::Hash::set' => {
18 _inline_check_arguments
23 'Moose::Meta::Method::Accessor::Native::Hash::get' => {
29 _inline_check_argument_count
30 _inline_process_arguments
35 sub _generate_method {
39 my $slot_access = $self->_inline_get($inv);
43 $self->_inline_pre_body(@_),
44 'my ' . $inv . ' = shift;',
45 $self->_inline_curried_arguments,
46 $self->_inline_check_lazy($inv),
49 $self->_inline_check_var_is_valid_key('$_[0]'),
50 $self->Moose::Meta::Method::Accessor::Native::Hash::get::_inline_return_value($slot_access),
54 $self->_writer_core($inv, $slot_access),
55 $self->_inline_post_body(@_),
61 sub _minimum_arguments {1}
62 sub _maximum_arguments {2}