[libmoox-late-perl] 05/11: some more challenging tests

[Intrigeri]

This is an automated email from the git hooks/post-receive script.

intrigeri pushed a commit to tag 0.012
in repository libmoox-late-perl.

commit 5598c5e624519784c85e73d52954d9e6ad4578e0
Author: Toby Inkster <mail at tobyinkster.co.uk>
Date:   Mon May 13 16:21:47 2013 +0100

    some more challenging tests
---
 t/05haveimissedanytypes.t | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)

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 at 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(

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmoox-late-perl.git