Fixed some bugs and added tests
[gitmo/MooseX-Types.git] / t / 10_moose-types.t
CommitLineData
8af0a70d 1#!/usr/bin/env perl
2use warnings;
3use strict;
4
5use Test::More;
6use FindBin;
7use lib "$FindBin::Bin/lib";
8use MooseX::TypeLibrary::Moose ':all';
9
10my @types = MooseX::TypeLibrary::Moose->type_names;
11
12plan tests => @types * 3;
13
14for my $t (@types) {
15 ok my $code = __PACKAGE__->can($t), "$t() was exported";
16 is $code->(), $t, "$t() returns '$t'";
17 ok __PACKAGE__->can("is_$t"), "is_$t() was exported";
18}
19