projects
/
gitmo/MooseX-Types.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
history
|
raw
|
HEAD
MooseX-Types-0.36
[gitmo/MooseX-Types.git]
/
t
/
23_any_subtype.t
1
use strict;
2
use warnings;
3
4
use Test::More;
5
use Test::Fatal;
6
7
use MooseX::Types -declare => ['Foo'];
8
use MooseX::Types::Moose qw( Any );
9
10
is(
11
exception { subtype Foo, as Any },
12
undef,
13
'no exception when subtyping Any type'
14
);
15
16
done_testing();