a70e48d7f

Build Type

push

github-actions

Committed by GitHub

Commit Message

<a href="https://github.com/tobyink/p5-type-tiny/commit/<a class=hub.com/tobyink/p5-type-tiny/commit/a70e48d7ff4fbd60d513b6c9cc54cf26fe583f62">a70e48d7f<a href="https://github.com/tobyink/p5-type-tiny/commit/a70e48d7ff4fbd60d513b6c9cc54cf26fe583f62">">Merge </a><a class="double-link" href="https://github.com/tobyink/p5-type-tiny/commit/<a class="double-link" href="https://github.com/tobyink/p5-type-tiny/commit/678f77f5e0f987e8c8d2efdf005263f8373d897d">678f77f5e</a>">678f77f5e</a><a href="https://github.com/tobyink/p5-type-tiny/commit/a70e48d7ff4fbd60d513b6c9cc54cf26fe583f62"> into 5ca75e09c">5ca75e09c</a>

Run Details

20 of 20 new or added lines in 1 file covered. (100.0%)

3095 of 3142 relevant lines covered (98.5%)

25555.41 hits per line

Source File
Press 'n' to go to next uncovered line, 'b' for previous

85.0

/lib/Types/Common.pm

package Types::Common;

use 5.006001;
use strict;
use warnings;

BEGIN {
        eval { require re };
        if ( $] < 5.008 ) { require Devel::TypeTiny::Perl56Compat }
        if ( $] < 5.010 ) { require Devel::TypeTiny::Perl58Compat }
}

BEGIN {
        $Types::Common::AUTHORITY = 'cpan:TOBYINK';
        $Types::Common::VERSION   = '1.016009';
}

our ( @EXPORT, @EXPORT_OK, %EXPORT_TAGS );

use Type::Library
        -extends => [ qw(
                Types::Standard
                Types::Common::Numeric
                Types::Common::String
        ) ];

use Type::Params ();
BEGIN {
        if ( my $sigs = $Type::Params::EXPORT_TAGS{-sigs} ) {
                'Type::Params'->import(-sigs);
                $EXPORT_TAGS{-sigs} = [ @$sigs ];
                push @EXPORT_OK, @$sigs;
        }
};

use Type::Registry ();
push @EXPORT_OK, 't';
sub _generate_t {
        my $package = shift;
        my $t = 'Type::Registry'->_generate_t( @_ );
        $t->()->add_types( $package );
        return $t;
}

1;

__END__

=pod

=encoding utf-8

=for stopwords arrayfication hashification

=head1 NAME

Types::Common - the one stop shop

=head1 STATUS

This module is covered by the
L<Type-Tiny stability policy|Type::Tiny::Manual::Policies/"STABILITY">.

=head1 DESCRIPTION

Types::Common doesn't provide any types or functions of its own.
Instead it's a single module that re-exports:

=over

=item *

All the types from L<Types::Standard>.

=item *

All the types from L<Types::Common::Numeric> and L<Types::Common::String>.

=item *

The C<< -sigs >> tag from L<Type::Params>.

=item *

The C<< t() >> function from L<Type::Registry>.

=back

If you import C<< t() >>, it will also be preloaded with all the type
constraints offered by Types::Common.

=head1 EXPORT

C<< use Types::Common qw( -types -sigs t ) >> might be a sensible place
to start.

C<< use Types::Common -all >> gives you everything.

If you have Perl 5.37.2+, then C<< use Types::Common qw( -lexical -all ) >>
won't pollute your namespace.

=head1 BUGS

Please report any bugs to
L<https://github.com/tobyink/p5-type-tiny/issues>.

=head1 SEE ALSO

L<Types::Standard>,
L<Types::Common::Numeric>,
L<Types::Common::String>;
L<Type::Params>;
L<Type::Registry>.

=head1 AUTHOR

Toby Inkster E<lt>tobyink@cpan.orgE<gt>.

=head1 COPYRIGHT AND LICENCE

This software is copyright (c) 2022 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.

=head1 DISCLAIMER OF WARRANTIES

THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED
WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.

1	package Types::Common;
2
3	use 5.006001;	8✔
4	use strict;	8✔
5	use warnings;	8✔
6
7	BEGIN {
8	eval { require re };	8✔
9	if ( $] < 5.008 ) { require Devel::TypeTiny::Perl56Compat }	8✔
10	if ( $] < 5.010 ) { require Devel::TypeTiny::Perl58Compat }	8✔
11	}
12
13	BEGIN {
14	$Types::Common::AUTHORITY = 'cpan:TOBYINK';	8✔
15	$Types::Common::VERSION = '1.016009';	8✔
16	}
17
18	our ( @EXPORT, @EXPORT_OK, %EXPORT_TAGS );
19
20	use Type::Library
21	-extends => [ qw(	8✔
22	Types::Standard
23	Types::Common::Numeric
24	Types::Common::String
25	) ];	8✔
26
27	use Type::Params ();	8✔
28	BEGIN {
29	if ( my $sigs = $Type::Params::EXPORT_TAGS{-sigs} ) {	8✔
30	'Type::Params'->import(-sigs);	×
31	$EXPORT_TAGS{-sigs} = [ @$sigs ];	×
32	push @EXPORT_OK, @$sigs;	×
33	}
34	};
35
36	use Type::Registry ();	8✔
37	push @EXPORT_OK, 't';
38	sub _generate_t {
39	my $package = shift;	8✔
40	my $t = 'Type::Registry'->_generate_t( @_ );	8✔
41	$t->()->add_types( $package );	8✔
42	return $t;	8✔
43	}
44
45	1;
46
47	__END__
48
49	=pod
50
51	=encoding utf-8
52
53	=for stopwords arrayfication hashification
54
55	=head1 NAME
56
57	Types::Common - the one stop shop
58
59	=head1 STATUS
60
61	This module is covered by the
62	L<Type-Tiny stability policy\|Type::Tiny::Manual::Policies/"STABILITY">.
63
64	=head1 DESCRIPTION
65
66	Types::Common doesn't provide any types or functions of its own.
67	Instead it's a single module that re-exports:
68
69	=over
70
71	=item *
72
73	All the types from L<Types::Standard>.
74
75	=item *
76
77	All the types from L<Types::Common::Numeric> and L<Types::Common::String>.
78
79	=item *
80
81	The C<< -sigs >> tag from L<Type::Params>.
82
83	=item *
84
85	The C<< t() >> function from L<Type::Registry>.
86
87	=back
88
89	If you import C<< t() >>, it will also be preloaded with all the type
90	constraints offered by Types::Common.
91
92	=head1 EXPORT
93
94	C<< use Types::Common qw( -types -sigs t ) >> might be a sensible place
95	to start.
96
97	C<< use Types::Common -all >> gives you everything.
98
99	If you have Perl 5.37.2+, then C<< use Types::Common qw( -lexical -all ) >>
100	won't pollute your namespace.
101
102	=head1 BUGS
103
104	Please report any bugs to
105	L<https://github.com/tobyink/p5-type-tiny/issues>.
106
107	=head1 SEE ALSO
108
109	L<Types::Standard>,
110	L<Types::Common::Numeric>,
111	L<Types::Common::String>;
112	L<Type::Params>;
113	L<Type::Registry>.
114
115	=head1 AUTHOR
116
117	Toby Inkster E<lt>tobyink@cpan.orgE<gt>.
118
119	=head1 COPYRIGHT AND LICENCE
120
121	This software is copyright (c) 2022 by Toby Inkster.
122
123	This is free software; you can redistribute it and/or modify it under
124	the same terms as the Perl 5 programming language system itself.
125
126	=head1 DISCLAIMER OF WARRANTIES
127
128	THIS PACKAGE IS PROVIDED "AS IS" AND WITHOUT ANY EXPRESS OR IMPLIED
129	WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED WARRANTIES OF
130	MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.

tobyink / p5-type-tiny / a70e48d7f

Source File Press 'n' to go to next uncovered line, 'b' for previous

Source File
Press 'n' to go to next uncovered line, 'b' for previous