2 package Mouse::TypeRegistry;
6 sub optimized_constraints {
11 !defined($_) || $_ eq "" || "$_" eq '1' || "$_" eq '0'
13 Undef => sub { !defined($_) },
14 Defined => sub { defined($_) },
19 ClassName => sub { 1 },
21 ScalarRef => sub { 1 },
22 ArrayRef => sub { 1 },
25 RegexpRef => sub { 1 },
27 FileHandle => sub { 1 },