X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=lib%2FTest%2FLeaner.pm;h=4aaa5e43b4dd07be15fddccb18dd02e879ef91fa;hb=a336a31d9cdb4fff3b625ccbc5e40b146052e730;hp=92f386f6402913e7bfd40a71d3e8a2ac5870c507;hpb=da6dd0b8533e32433851119428d3bc4e1959599c;p=perl%2Fmodules%2FTest-Leaner.git diff --git a/lib/Test/Leaner.pm b/lib/Test/Leaner.pm index 92f386f..4aaa5e4 100644 --- a/lib/Test/Leaner.pm +++ b/lib/Test/Leaner.pm @@ -30,6 +30,24 @@ our $VERSION = '0.01'; When profiling some L-based test script that contained about 10 000 unit tests, I realized that 60% of the time was spent in L itself, even though every single test actually involved a costly C. This module aims to be a partial replacement to L in those situations where you want to run a large number of simple tests. +Its functions behave the same as their L counterparts, except for the following differences : + +=over 4 + +=item * + +Stringification isn't forced on the test operands. +However, L honors C<'bool'> overloading, L honors C<'eq'> overloading and L honors whichever overloading category corresponds to the specified operator. + +=item * + +L, L, L, L, L, L, L and L are all guaranteed to return the truth value of the test. + +=item * + +C, C, C, C, C, C, C, C blocks and C are not implemented. + +=back =cut @@ -142,7 +160,6 @@ sub plan { our @EXPORT = qw< plan - skip_all skip done_testing pass @@ -192,15 +209,6 @@ sub import { goto &Exporter::import; } -=head2 C - -=cut - -sub skip_all { - @_ = (skip_all => $_[0]); - goto &plan; -} - =head2 C<< skip $reason => $count >> =cut @@ -495,9 +503,6 @@ END { =pod -L, L, L, L, L, L, L and L are all guaranteed to return the truth value of the test. -Their L counterparts behave the same, but it is not documented anywhere. - L also provides some functions of its own, which are never exported. =head2 C