X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F010_self_introspection.t;h=ff2e2c596882fbb910bc57f70d27298b3779d835;hb=d004c8d565f9b314da7652e9368aeb4587ffaa3d;hp=c16b1d0fa849386b21635a48a72adc1f5c379587;hpb=8b1cc3591627545a0a1b4a16b2aeef03cf4c3bc6;p=gitmo%2FClass-MOP.git

diff --git a/t/010_self_introspection.t b/t/010_self_introspection.t
index c16b1d0..ff2e2c5 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;
@@ -55,16 +55,19 @@ my @class_mop_class_methods = qw(
 
     initialize reinitialize create
 
-    update_package_cache_flag
-    reset_package_cache_flag
-
     create_anon_class is_anon_class
 
     instance_metaclass get_meta_instance
-    inline_create_instance
-    inline_rebless_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
+    _inline_new_object _inline_default_value _inline_preserve_weak_metaclasses
+    _inline_slot_initializer _inline_extra_init _inline_fallback_constructor
+    _inline_generate_instance _inline_params _inline_slot_initializers
+    _inline_init_attr_from_constructor _inline_init_attr_from_default
+    _generate_fallback_constructor
     construct_instance _construct_instance
     construct_class_instance _construct_class_instance
     clone_instance _clone_instance
@@ -75,13 +78,10 @@ my @class_mop_class_methods = qw(
     _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
 
-    _get_associated_single_metaclass
-    _make_metaobject_compatible
     _remove_generated_metaobjects
     _restore_metaobjects_from
 
@@ -90,7 +90,7 @@ my @class_mop_class_methods = qw(
     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