diff options
| author | Toby Inkster <mail@tobyinkster.co.uk> | 2013-05-13 16:21:47 +0100 |
|---|---|---|
| committer | Toby Inkster <mail@tobyinkster.co.uk> | 2013-05-13 16:21:47 +0100 |
| commit | 5598c5e624519784c85e73d52954d9e6ad4578e0 (patch) | |
| tree | 0e0a93b79cf9327972761b565d692ef51fccac6c /t | |
| parent | 89c2b19fc37ee3414d96ce0e4446fa7052326470 (diff) | |
some more challenging tests
Diffstat (limited to 't')
| -rw-r--r-- | t/05haveimissedanytypes.t | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/t/05haveimissedanytypes.t b/t/05haveimissedanytypes.t index 1166f6f..c1888ff 100644 --- a/t/05haveimissedanytypes.t +++ b/t/05haveimissedanytypes.t @@ -1,3 +1,21 @@ +=pod + +=head1 PURPOSE + +Test that all Moose's built-in type constraints are correctly parsed. + +=head1 AUTHOR + +Toby Inkster E<lt>tobyink@cpan.orgE<gt>. + +=head1 COPYRIGHT AND LICENCE + +This software is copyright (c) 2013 by Toby Inkster. + +This is free software; you can redistribute it and/or modify it under +the same terms as the Perl 5 programming language system itself. + +=cut use strict; use warnings; @@ -31,6 +49,10 @@ my @types_to_check = qw( GlobRef FileHandle Object + Int|ArrayRef[Int] + ArrayRef[Int|HashRef[Int]] + ArrayRef[HashRef[Int]|Int] + ArrayRef[HashRef[Int]]|Int ); my @class_types_to_check = qw( |