X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F000_load.t;h=f6b3ec41dfd29dfed04ad49562b16556cd99f0f8;hb=301d65f26c8dffbce037d89208788bf21c40a7b1;hp=2507c475b43d210a20c2b19fcb5b1b583bec6c00;hpb=1b4681df6d7d4d26c53f9ce398c3acee06aa856c;p=gitmo%2FClass-MOP.git diff --git a/t/000_load.t b/t/000_load.t index 2507c47..f6b3ec4 100644 --- a/t/000_load.t +++ b/t/000_load.t @@ -1,21 +1,26 @@ use strict; use warnings; -use Test::More tests => 50; +use Test::More; BEGIN { use_ok('Class::MOP'); + use_ok('Class::MOP::Mixin'); + use_ok('Class::MOP::Mixin::AttributeCore'); + use_ok('Class::MOP::Mixin::HasAttributes'); + use_ok('Class::MOP::Mixin::HasMethods'); use_ok('Class::MOP::Package'); use_ok('Class::MOP::Module'); use_ok('Class::MOP::Class'); use_ok('Class::MOP::Class::Immutable::Trait'); - use_ok('Class::MOP::Attribute'); + use_ok('Class::MOP::Method'); use_ok('Class::MOP::Method'); use_ok('Class::MOP::Method::Wrapped'); use_ok('Class::MOP::Method::Inlined'); use_ok('Class::MOP::Method::Generated'); use_ok('Class::MOP::Method::Accessor'); use_ok('Class::MOP::Method::Constructor'); + use_ok('Class::MOP::Method::Meta'); use_ok('Class::MOP::Instance'); use_ok('Class::MOP::Object'); } @@ -27,8 +32,12 @@ my %METAS = ( 'Class::MOP::Method::Inlined' => Class::MOP::Method::Inlined->meta, 'Class::MOP::Method::Generated' => Class::MOP::Method::Generated->meta, 'Class::MOP::Method::Accessor' => Class::MOP::Method::Accessor->meta, - 'Class::MOP::Method::Constructor' => - Class::MOP::Method::Constructor->meta, + 'Class::MOP::Method::Constructor' => Class::MOP::Method::Constructor->meta, + 'Class::MOP::Method::Meta' => Class::MOP::Method::Meta->meta, + 'Class::MOP::Mixin' => Class::MOP::Mixin->meta, + 'Class::MOP::Mixin::AttributeCore' => Class::MOP::Mixin::AttributeCore->meta, + 'Class::MOP::Mixin::HasAttributes' => Class::MOP::Mixin::HasAttributes->meta, + 'Class::MOP::Mixin::HasMethods' => Class::MOP::Mixin::HasMethods->meta, 'Class::MOP::Package' => Class::MOP::Package->meta, 'Class::MOP::Module' => Class::MOP::Module->meta, 'Class::MOP::Class' => Class::MOP::Class->meta, @@ -76,7 +85,12 @@ is_deeply( Class::MOP::Method::Constructor->meta, Class::MOP::Method::Generated->meta, Class::MOP::Method::Inlined->meta, + Class::MOP::Method::Meta->meta, Class::MOP::Method::Wrapped->meta, + Class::MOP::Mixin->meta, + Class::MOP::Mixin::AttributeCore->meta, + Class::MOP::Mixin::HasAttributes->meta, + Class::MOP::Mixin::HasMethods->meta, Class::MOP::Module->meta, Class::MOP::Object->meta, Class::MOP::Package->meta, @@ -92,6 +106,10 @@ is_deeply( Class::MOP::Class Class::MOP::Class::Immutable::Class::MOP::Class Class::MOP::Class::Immutable::Trait + Class::MOP::Mixin + Class::MOP::Mixin::AttributeCore + Class::MOP::Mixin::HasAttributes + Class::MOP::Mixin::HasMethods Class::MOP::Instance Class::MOP::Method Class::MOP::Method::Accessor @@ -99,6 +117,7 @@ is_deeply( Class::MOP::Method::Generated Class::MOP::Method::Inlined Class::MOP::Method::Wrapped + Class::MOP::Method::Meta Class::MOP::Module Class::MOP::Object Class::MOP::Package @@ -130,3 +149,5 @@ is( ); isa_ok(Class::MOP::Class->meta, 'Class::MOP::Class'); + +done_testing;