_inline_check_arguments
_new_members
_inline_optimized_set_new_value
+ _return_value
)
]
};
return "${slot_access}->[ \$_[0] ] = \$_[1]";
}
+sub _return_value {
+ my ( $self, $slot_access ) = @_;
+
+ return "return ${slot_access}->[ \$_[0] ];";
+}
+
no Moose::Role;
1;