X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F010_self_introspection.t;h=d16e2526fb189f4b6ff7ed688f39231f357e7607;hb=871e9eb5d05b8b9986b2de3f4095f65a31159c56;hp=e5e1beda92387143c5b0f594d5514a9f625090c1;hpb=407a4276404accc3cbc71b04e685b4e86e3a01c3;p=gitmo%2FClass-MOP.git diff --git a/t/010_self_introspection.t b/t/010_self_introspection.t index e5e1bed..d16e252 100644 --- a/t/010_self_introspection.t +++ b/t/010_self_introspection.t @@ -2,7 +2,7 @@ use strict; use warnings; use Test::More; -use Test::Exception; +use Test::Fatal; use Class::MOP; use Class::MOP::Class; @@ -31,7 +31,8 @@ my @class_mop_package_methods = qw( name namespace - add_package_symbol get_package_symbol has_package_symbol remove_package_symbol + add_package_symbol get_package_symbol has_package_symbol + remove_package_symbol get_or_add_package_symbol list_all_package_symbols get_all_package_symbols remove_package_glob _package_stash @@ -52,7 +53,7 @@ my @class_mop_class_methods = qw( is_pristine - initialize create + initialize reinitialize create update_package_cache_flag reset_package_cache_flag @@ -60,28 +61,34 @@ my @class_mop_class_methods = qw( create_anon_class is_anon_class instance_metaclass get_meta_instance + inline_create_instance + inline_rebless_instance + _inline_get_mop_slot _inline_set_mop_slot _inline_clear_mop_slot create_meta_instance _create_meta_instance new_object clone_object construct_instance _construct_instance construct_class_instance _construct_class_instance clone_instance _clone_instance rebless_instance rebless_instance_back rebless_instance_away + _force_rebless_instance _fixup_attributes_after_rebless check_metaclass_compatibility _check_metaclass_compatibility _check_class_metaclass_compatibility _check_single_metaclass_compatibility _class_metaclass_is_compatible _single_metaclass_is_compatible _fix_metaclass_incompatibility _fix_class_metaclass_incompatibility _fix_single_metaclass_incompatibility _base_metaclasses - _can_fix_class_metaclass_incompatibility_by_subclassing - _can_fix_single_metaclass_incompatibility_by_subclassing - _can_fix_metaclass_incompatibility_by_subclassing _can_fix_metaclass_incompatibility + _class_metaclass_can_be_made_compatible + _single_metaclass_can_be_made_compatible + + _remove_generated_metaobjects + _restore_metaobjects_from add_meta_instance_dependencies remove_meta_instance_dependencies update_meta_instance_dependencies add_dependent_meta_instance remove_dependent_meta_instance invalidate_meta_instances invalidate_meta_instance superclasses subclasses direct_subclasses class_precedence_list - linearized_isa _superclasses_updated + linearized_isa _superclasses_updated _superclass_metas alias_method get_all_method_names get_all_methods compute_all_applicable_methods find_method_by_name find_all_methods_by_name find_next_method_by_name