- # Yes, we store a coderef inside the hints hash, but that's just for compile
- # time.
$^H{+(__PACKAGE__)} = $hint;
$^H{+(__PACKAGE__)} = $hint;
+
+ return;
}
=head2 C<unimport>
}
=head2 C<unimport>
-Magically called when writing C<no Lexical::Types>.
+ no Lexical::Types;
+
+Magically called when C<no Lexical::Types> is encountered.
Turns the pragma off.
=cut
sub unimport {
Turns the pragma off.
=cut
sub unimport {
+ $^H |= 0x020000;
$^H{+(__PACKAGE__)} = undef;
$^H{+(__PACKAGE__)} = undef;
+
+ return;
}
=head1 RUN-TIME INITIALIZER METHOD
}
=head1 RUN-TIME INITIALIZER METHOD
@@ -222,7+232,7 @@ If you prefer to use constants rather than creating empty packages, you can repl
sub import {
my $pkg = caller;
sub import {
my $pkg = caller;
- for (qw/Str Int/) {
+ for (qw<Str Int>) {
my $type = __PACKAGE__ . '::' . $_;
no strict 'refs';
no warnings 'redefine';
my $type = __PACKAGE__ . '::' . $_;
no strict 'refs';
no warnings 'redefine';
@@ -251,12+261,21 @@ If you prefer to use constants rather than creating empty packages, you can repl
True iff the module could have been built with thread-safety features enabled.
True iff the module could have been built with thread-safety features enabled.
+=head2 C<LT_FORKSAFE>
+
+True iff this module could have been built with fork-safety features enabled.
+This will always be true except on Windows where it's false for perl 5.10.0 and below .
+
=head1 CAVEATS
=head1 CAVEATS
+Using this pragma will cause a slight global slowdown of any subsequent compilation phase that happens anywere in your code - even outside of the scope of use of C<use Lexical::Types> - which may become noticeable if you rely heavily on numerous calls to C<eval STRING>.
+
The restrictions on the type (being either a defined package name or a constant) apply even if you use the C<'as'> option to redirect to another package, and are unlikely to find a workaround as this happens deep inside the lexer - far from the reach of an extension.
Only one mangler or prefix can be in use at the same time in a given scope.
The restrictions on the type (being either a defined package name or a constant) apply even if you use the C<'as'> option to redirect to another package, and are unlikely to find a workaround as this happens deep inside the lexer - far from the reach of an extension.
Only one mangler or prefix can be in use at the same time in a given scope.
+Typed lexicals declarations that appear in code C<eval>'d during the global destruction phase of a spawned thread or pseudo-fork (the processes used internally for the C<fork> emulation on Windows) are ignored.
+
The implementation was tweaked to work around several limitations of vanilla C<perl> pragmas : it's thread safe, and doesn't suffer from a C<perl 5.8.x-5.10.0> bug that causes all pragmas to propagate into C<require>d scopes.
With 5.8 perls, the pragma does not propagate into C<eval STRING>.
The implementation was tweaked to work around several limitations of vanilla C<perl> pragmas : it's thread safe, and doesn't suffer from a C<perl 5.8.x-5.10.0> bug that causes all pragmas to propagate into C<require>d scopes.
With 5.8 perls, the pragma does not propagate into C<eval STRING>.
@@ -264,7+283,12 @@ This is due to a shortcoming in the way perl handles the hints hash, which is ad
=head1 DEPENDENCIES
=head1 DEPENDENCIES
-L<perl> 5.8, L<XSLoader>.
+L<perl> 5.8.4.
+
+A C compiler.
+This module may happen to build with a C++ compiler as well, but don't rely on it, as no guarantee is made in this regard.
+
+L<XSLoader> (standard since perl 5.6.0).
=head1 SEE ALSO
=head1 SEE ALSO
@@ -280,7+304,8 @@ You can contact me by mail or on C<irc.perl.org> (vincent).
=head1 BUGS
=head1 BUGS
-Please report any bugs or feature requests to C<bug-lexical-types at rt.cpan.org>, or through the web interface at L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Lexical-Types>. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
+Please report any bugs or feature requests to C<bug-lexical-types at rt.cpan.org>, or through the web interface at L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Lexical-Types>.
+I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.
=head1 SUPPORT
=head1 SUPPORT
@@ -288,8+313,6 @@ You can find documentation for this module with the perldoc command.
perldoc Lexical::Types
perldoc Lexical::Types
-Tests code coverage report is available at L<http://www.profvince.com/perl/cover/Lexical-Types>.
-
=head1 ACKNOWLEDGEMENTS
Inspired by Ricardo Signes.
=head1 ACKNOWLEDGEMENTS
Inspired by Ricardo Signes.
@@ -298,7+321,7 @@ Thanks Florian Ragwitz for suggesting the use of constants for types.
=head1 COPYRIGHT & LICENSE
=head1 COPYRIGHT & LICENSE
-Copyright 2009 Vincent Pit, all rights reserved.
+Copyright 2009,2010,2011,2012,2013,2014,2015 Vincent Pit, all rights reserved.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.