X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FLexical%2FTypes.pm;h=88b00afdf6073d65b746e67d7a9af0a0fc5b8f05;hb=20bcb585bd9651cd40e91ab49b3651aa7259c3a6;hp=ce3a076771aa1e7e92bad8325ee9d6b6f1fff38c;hpb=ca4e18860e8ac0d9754f933838673af82ca02b27;p=perl%2Fmodules%2FLexical-Types.git diff --git a/lib/Lexical/Types.pm b/lib/Lexical/Types.pm index ce3a076..88b00af 100644 --- a/lib/Lexical/Types.pm +++ b/lib/Lexical/Types.pm @@ -1,6 +1,6 @@ package Lexical::Types; -use 5.008003; +use 5.008_003; use strict; use warnings; @@ -11,13 +11,13 @@ Lexical::Types - Extend the semantics of typed lexicals. =head1 VERSION -Version 0.10 +Version 0.12 =cut our $VERSION; BEGIN { - $VERSION = '0.10'; + $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 @@ -273,7 +281,7 @@ 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