From: Vincent Pit Date: Thu, 31 Jan 2013 00:50:39 +0000 (-0200) Subject: POD overhaul X-Git-Tag: v0.02~4 X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2FScope-Context.git;a=commitdiff_plain;h=4d0d929cc4f8e8f7ad6a2a4bd9caa2ab55b0259a POD overhaul --- diff --git a/lib/Scope/Context.pm b/lib/Scope/Context.pm index 85fd573..0bbfd91 100644 --- a/lib/Scope/Context.pm +++ b/lib/Scope/Context.pm @@ -92,7 +92,7 @@ will croak when L is called. my $cxt = Scope::Context->new; my $cxt = Scope::Context->new($scope_upper_cxt); -Creates a new immutable L object from the L-comptabile context C<$context>. +Creates a new immutable L object from the L-comptabile context identifier C<$context>. If omitted, C<$context> defaults to the current context. =cut @@ -133,13 +133,13 @@ sub _croak { my $scope_upper_cxt = $cxt->cxt; -Read-only accessor to the L context corresponding to the topic L object. +Read-only accessor to the L context identifier associated with the invocant. =head2 C my $uid = $cxt->uid; -Read-only accessor to the L UID of the topic L object. +Read-only accessor to the L unique identifier representing the L context associated with the invocant. =cut @@ -171,7 +171,7 @@ use overload ( my $is_valid = $cxt->is_valid; -Returns true if and only if the topic context is still valid (that is, it designates a scope that is higher than the topic context in the call stack). +Returns true if and only if the invocant is still valid (that is, it designates a scope that is higher on the call stack than the current scope). =cut @@ -181,7 +181,7 @@ sub is_valid { Scope::Upper::validate_uid($_[0]->uid) } $cxt->assert_valid; -Throws an exception if the topic context has expired and is no longer valid. +Throws an exception if the invocant has expired and is no longer valid. Returns true otherwise. =cut @@ -198,7 +198,7 @@ sub assert_valid { my $want = $cxt->want; -Returns the Perl context (in the sense of C : C for void context, C<''> for scalar context, and true for list context) in which is executed the scope corresponding to the topic L object. +Returns the Perl context (in the sense of C : C for void context, C<''> for scalar context, and true for list context) in which is executed the scope pointed by the invocant. =cut @@ -216,9 +216,9 @@ sub want { my $up_cxt = $cxt->up($frames); my $up_cxt = Scope::Context->up; -Returns a new L object pointing to the C<$frames>-th upper scope above the topic context. +Returns a new L object pointing to the C<$frames>-th upper scope above the scope pointed by the invocant. -This method can also be invoked as a class method, in which case it is equivalent to calling L on a L object for the current context. +This method can also be invoked as a class method, in which case it is equivalent to calling L on a L object representing the current context. If omitted, C<$frames> defaults to C<1>. @@ -257,11 +257,11 @@ sub up { my $sub_cxt = $cxt->sub($frames); my $sub_cxt = Scope::Context->sub; -Returns a new L object pointing to the C<$frames>-th subroutine scope above the topic context. +Returns a new L object pointing to the C<$frames>-th subroutine scope above the scope pointed by the invocant. This method can also be invoked as a class method, in which case it is equivalent to calling L on a L object for the current context. -If omitted, C<$frames> defaults to C<0>, which results in the closest sub enclosing the topic context. +If omitted, C<$frames> defaults to C<0>, which results in the closest sub enclosing the scope pointed by the invocant. outer(); @@ -301,11 +301,11 @@ sub sub { my $eval_cxt = $cxt->eval($frames); my $eval_cxt = Scope::Context->eval; -Returns a new L object pointing to the C<$frames>-th C scope above the topic context. +Returns a new L object pointing to the C<$frames>-th C scope above the scope pointed by the invocant. This method can also be invoked as a class method, in which case it is equivalent to calling L on a L object for the current context. -If omitted, C<$frames> defaults to C<0>, which results in the closest eval enclosing the topic context. +If omitted, C<$frames> defaults to C<0>, which results in the closest eval enclosing the scope pointed by the invocant. eval { sub { @@ -339,7 +339,7 @@ sub eval { $cxt->reap($code); -Execute C<$code> when the topic context ends. +Execute C<$code> when the scope pointed by the invocant ends. See L for details. @@ -357,7 +357,7 @@ sub reap { $cxt->localize($what, $value); -Localize the variable described by C<$what> to the value C<$value> when the control flow returns to the scope pointed by the topic context. +Localize the variable described by C<$what> to the value C<$value> when the control flow returns to the scope pointed by the invocant. See L for details. @@ -375,7 +375,7 @@ sub localize { $cxt->localize_elem($what, $key, $value); -Localize the element C<$key> of the variable C<$what> to the value C<$value> when the control flow returns to the scope pointed by the topic context. +Localize the element C<$key> of the variable C<$what> to the value C<$value> when the control flow returns to the scope pointed by the invocant. See L for details. @@ -393,7 +393,7 @@ sub localize_elem { $cxt->localize_delete($what, $key); -Delete the element C<$key> from the variable C<$what> when the control flow returns to the scope pointed by the topic context. +Delete the element C<$key> from the variable C<$what> when the control flow returns to the scope pointed by the invocant. See L for details. @@ -411,7 +411,7 @@ sub localize_delete { $cxt->unwind(@values); -Immediately returns the scalars listed in C<@values> from the closest subroutine enclosing the topic context. +Immediately returns the scalars listed in C<@values> from the closest subroutine enclosing the scope pointed by the invocant. See L for details. @@ -429,7 +429,7 @@ sub unwind { $cxt->yield(@values); -Immediately returns the scalars listed in C<@values> from the topic context, whatever it may be (except a substitution eval context). +Immediately returns the scalars listed in C<@values> from the scope pointed by the invocant, whatever it may be (except a substitution eval context). See L for details. @@ -447,7 +447,7 @@ sub yield { my @ret = $cxt->uplevel($code, @args); -Executes the code reference C<$code> with arguments C<@args> in the same setting as the closest subroutine enclosing the topic context, then returns to the current scope the values returned by C<$code>. +Executes the code reference C<$code> with arguments C<@args> in the same setting as the closest subroutine enclosing the scope pointed by the invocant, then returns to the current scope the values returned by C<$code>. See L for details.