name => 'DESTROY'
);
- return unless $destructor->is_needed;
-
- $metaclass->add_method( 'DESTROY' => $destructor )
+ $self->metaclass->add_method( 'DESTROY' => $destructor );
}
sub _check_memoized_methods {
],
- 'Class::MOP::Immutable' => [
- qw( create_immutable_metaclass
- create_methods_for_immutable_metaclass
- make_metaclass_immutable
- make_metaclass_mutable )
+ 'Class::MOP::Instance' => [
+ qw( BUILDARGS
+ bless_instance_structure
+ is_dependent_on_superclasses ),
],
+ 'Class::MOP::Instance' => [
+ qw( BUILDARGS
+ bless_instance_structure
+ is_dependent_on_superclasses ),
+ ],
+
'Class::MOP::Method::Accessor' => [
qw( generate_accessor_method
generate_accessor_method_inline