X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FLexical%2FTypes.pm;h=518e20522e776bc48e8c73def5b1c8685d49c0ad;hb=cb00fbfded7c20f01c75b520c5e5d2b582e2d4be;hp=ab54c250121ed2beb7570ade4b5580de5a4f3af7;hpb=40ef72f0c01074b9767916dee4cb8eb478929e6f;p=perl%2Fmodules%2FLexical-Types.git diff --git a/lib/Lexical/Types.pm b/lib/Lexical/Types.pm index ab54c25..518e205 100644 --- a/lib/Lexical/Types.pm +++ b/lib/Lexical/Types.pm @@ -1,6 +1,6 @@ package Lexical::Types; -use 5.008001; +use 5.008_003; use strict; use warnings; @@ -11,13 +11,13 @@ Lexical::Types - Extend the semantics of typed lexicals. =head1 VERSION -Version 0.09 +Version 0.12 =cut our $VERSION; BEGIN { - $VERSION = '0.09'; + $VERSION = '0.12'; } =head1 SYNOPSIS @@ -76,11 +76,15 @@ BEGIN { XSLoader::load(__PACKAGE__, $VERSION); } -=head1 FUNCTIONS +=head1 METHODS -=head2 C<< import [ as => [ $prefix | $mangler ] ] >> +=head2 C -Magically called when writing C. + use Lexical::Types; + use Lexical::Types as => $prefix; + use Lexical::Types as => sub { ... }; # = $mangler + +Magically called when C is encountered. All the occurences of C in the current lexical scope will be changed to call at each run a given method in a given package. The method and package are determined by the parameter C<'as'> : @@ -110,7 +114,9 @@ If the value given is a code reference C<$mangler>, it will be called at compile either an empty list, in which case the current typed lexical definition will be skipped (thus it won't be altered to trigger a run-time hook) ; - use Lexical::Types as => sub { return $_[0] =~ /Str/ ? @_ : () }; + use Lexical::Types as => sub { + return $_[0] =~ /Str/ ? @_ : () + }; my Str $y; # calls Str->TYPEDSCALAR my Int $x; # nothing special @@ -165,7 +171,9 @@ sub import { =head2 C -Magically called when writing C. + no Lexical::Types; + +Magically called when C is encountered. Turns the pragma off. =cut @@ -221,7 +229,7 @@ If you prefer to use constants rather than creating empty packages, you can repl sub import { my $pkg = caller; - for (qw/Str Int/) { + for (qw) { my $type = __PACKAGE__ . '::' . $_; no strict 'refs'; no warnings 'redefine'; @@ -261,6 +269,8 @@ The restrictions on the type (being either a defined package name or a constant) 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'd during the global destruction phase of a spawned thread or pseudo-fork (the processes used internally for the C emulation on Windows) are ignored. + The implementation was tweaked to work around several limitations of vanilla C pragmas : it's thread safe, and doesn't suffer from a C bug that causes all pragmas to propagate into Cd scopes. With 5.8 perls, the pragma does not propagate into C. @@ -268,12 +278,12 @@ This is due to a shortcoming in the way perl handles the hints hash, which is ad =head1 DEPENDENCIES -L 5.8.1. +L 5.8.3. 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 (standard since perl 5.006). +L (standard since perl 5.6.0). =head1 SEE ALSO @@ -289,7 +299,8 @@ You can contact me by mail or on C (vincent). =head1 BUGS -Please report any bugs or feature requests to C, or through the web interface at L. 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, or through the web interface at L. +I will be notified, and then you'll automatically be notified of progress on your bug as I make changes. =head1 SUPPORT