X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2Findirect.pm;h=27c37b469cfcd4808f8a14341b4578c0c7ee8f63;hb=b47c75970ab200626c92f26eab0f3a4a1123bb6f;hp=1b39ca5574c496e94dea84ace1f72c3eb0a62121;hpb=ff3c9826e97293d24f37e6c9ab6656f5803b4cd6;p=perl%2Fmodules%2Findirect.git diff --git a/lib/indirect.pm b/lib/indirect.pm index 1b39ca5..27c37b4 100644 --- a/lib/indirect.pm +++ b/lib/indirect.pm @@ -11,13 +11,13 @@ indirect - Lexically warn about using the indirect object syntax. =head1 VERSION -Version 0.15 +Version 0.17 =cut our $VERSION; BEGIN { - $VERSION = '0.15'; + $VERSION = '0.17'; } =head1 SYNOPSIS @@ -143,6 +143,16 @@ sub msg { True iff the module could have been built with thread-safety features enabled. +=head1 DIAGNOSTICS + +=head2 C + +The default warning/exception message thrown when an indirect call on an object is found. + +=head2 C + +The default warning/exception message thrown when an indirect call on a block is found. + =head1 CAVEATS 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. @@ -152,6 +162,9 @@ C (no semicolon) at the end of a file won't be seen as an indirect ob With 5.8 perls, the pragma does not propagate into C. This is due to a shortcoming in the way perl handles the hints hash, which is addressed in perl 5.10. +The search for indirect method calls happens before constant folding. +Hence C will be caught. + =head1 DEPENDENCIES L 5.8. @@ -181,6 +194,8 @@ Tests code coverage report is available at L