r71404 - in /branches/upstream/libautobox-perl/current: Changes META.yml Makefile.PL README autobox.xs lib/autobox.pm lib/autobox.pod
angelabad-guest at users.alioth.debian.org
angelabad-guest at users.alioth.debian.org
Mon Mar 14 14:10:27 UTC 2011
Author: angelabad-guest
Date: Mon Mar 14 14:10:09 2011
New Revision: 71404
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=71404
Log:
[svn-upgrade] new version libautobox-perl (2.73)
Modified:
branches/upstream/libautobox-perl/current/Changes
branches/upstream/libautobox-perl/current/META.yml
branches/upstream/libautobox-perl/current/Makefile.PL
branches/upstream/libautobox-perl/current/README
branches/upstream/libautobox-perl/current/autobox.xs
branches/upstream/libautobox-perl/current/lib/autobox.pm
branches/upstream/libautobox-perl/current/lib/autobox.pod
Modified: branches/upstream/libautobox-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libautobox-perl/current/Changes?rev=71404&op=diff
==============================================================================
--- branches/upstream/libautobox-perl/current/Changes (original)
+++ branches/upstream/libautobox-perl/current/Changes Mon Mar 14 14:10:09 2011
@@ -1,7 +1,10 @@
Revision history for Perl extension autobox
+2.73 Sun Mar 13 16:35:28 2011
+ - Makefile.PL fix
+
2.72 Fri Jan 28 12:16:34 2011
- - fix PL_hints conflict with HINT_RE_TAINT (thanks, Peter Rabbitson)
+ - fix conflict with use re 'taint' (thanks, Peter Rabbitson)
2.71 Thu Sep 23 02:28:10 2010
- fix for recent perls: remove cargo-cultism
Modified: branches/upstream/libautobox-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libautobox-perl/current/META.yml?rev=71404&op=diff
==============================================================================
--- branches/upstream/libautobox-perl/current/META.yml (original)
+++ branches/upstream/libautobox-perl/current/META.yml Mon Mar 14 14:10:09 2011
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: autobox
-version: 2.72
+version: 2.73
abstract: call methods on native types
author:
- chocolateboy <chocolate at cpan.org>
Modified: branches/upstream/libautobox-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libautobox-perl/current/Makefile.PL?rev=71404&op=diff
==============================================================================
--- branches/upstream/libautobox-perl/current/Makefile.PL (original)
+++ branches/upstream/libautobox-perl/current/Makefile.PL Mon Mar 14 14:10:09 2011
@@ -28,8 +28,8 @@
AUTHOR => 'chocolateboy <chocolate at cpan.org>',
INC => '-I.',
OPTIMIZE => $OPTIMIZE,
- ($ExtUtils::MakeMaker::VERSION ge 6.31 ? (LICENSE => 'perl') : ()),
- ($ExtUtils::MakeMaker::VERSION ge 6.46 ?
+ (eval($ExtUtils::MakeMaker::VERSION) >= 6.31 ? (LICENSE => 'perl') : ()),
+ (eval($ExtUtils::MakeMaker::VERSION) >= 6.46 ?
(META_MERGE => {
resources => {
repository => 'http://github.com/chocolateboy/autobox',
Modified: branches/upstream/libautobox-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libautobox-perl/current/README?rev=71404&op=diff
==============================================================================
--- branches/upstream/libautobox-perl/current/README (original)
+++ branches/upstream/libautobox-perl/current/README Mon Mar 14 14:10:09 2011
@@ -1,4 +1,4 @@
-autobox version 2.72
+autobox version 2.73
====================
The autobox pragma allows methods to be called on integers, floats, strings, arrays,
Modified: branches/upstream/libautobox-perl/current/autobox.xs
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libautobox-perl/current/autobox.xs?rev=71404&op=diff
==============================================================================
--- branches/upstream/libautobox-perl/current/autobox.xs (original)
+++ branches/upstream/libautobox-perl/current/autobox.xs Mon Mar 14 14:10:09 2011
@@ -11,7 +11,7 @@
static PTABLE_t *AUTOBOX_OP_MAP = NULL;
static U32 AUTOBOX_SCOPE_DEPTH = 0;
static OP *(*autobox_old_ck_subr)(pTHX_ OP *op) = NULL;
-static SV * autobox_method_common(pTHX_ SV *meth, U32 *hashp);
+static SV * autobox_method_common(pTHX_ SV *meth, U32 *hashp);
static const char * autobox_type(pTHX_ SV * const sv, STRLEN *len);
OP * autobox_ck_subr(pTHX_ OP *o);
@@ -103,7 +103,7 @@
dVAR; dSP;
SV * const sv = TOPs;
SV * cv;
-
+
if (SvROK(sv)) {
cv = SvRV(sv);
if (SvTYPE(cv) == SVt_PVCV) {
@@ -300,7 +300,7 @@
void
_enter()
PROTOTYPE:
- CODE:
+ CODE:
if (AUTOBOX_SCOPE_DEPTH > 0) {
++AUTOBOX_SCOPE_DEPTH;
} else {
@@ -317,7 +317,7 @@
void
_leave()
PROTOTYPE:
- CODE:
+ CODE:
if (AUTOBOX_SCOPE_DEPTH == 0) {
Perl_warn(aTHX_ "scope underflow");
}
@@ -332,13 +332,13 @@
void
_scope()
PROTOTYPE:
- CODE:
+ CODE:
XSRETURN_UV(PTR2UV(GvHV(PL_hintgv)));
void
END()
PROTOTYPE:
- CODE:
+ CODE:
if (autobox_old_ck_subr) { /* make sure we got as far as initializing it */
PL_check[OP_ENTERSUB] = autobox_old_ck_subr;
}
Modified: branches/upstream/libautobox-perl/current/lib/autobox.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libautobox-perl/current/lib/autobox.pm?rev=71404&op=diff
==============================================================================
--- branches/upstream/libautobox-perl/current/lib/autobox.pm (original)
+++ branches/upstream/libautobox-perl/current/lib/autobox.pm Mon Mar 14 14:10:09 2011
@@ -11,7 +11,7 @@
use Scope::Guard;
use Storable;
-our $VERSION = '2.72';
+our $VERSION = '2.73';
XSLoader::load 'autobox', $VERSION;
Modified: branches/upstream/libautobox-perl/current/lib/autobox.pod
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libautobox-perl/current/lib/autobox.pod?rev=71404&op=diff
==============================================================================
--- branches/upstream/libautobox-perl/current/lib/autobox.pod (original)
+++ branches/upstream/libautobox-perl/current/lib/autobox.pod Mon Mar 14 14:10:09 2011
@@ -114,7 +114,7 @@
use autobox SCALAR => [ 'Foo', 'Bar' ];
use autobox ARRAY => 'Baz';
-- bind SCALAR types to the C<Foo> and C<Bar> classes and ARRAY types to C<Baz>.
+- bind SCALAR types to the C<Foo> and C<Bar> classes and ARRAY types to C<Baz>.
C<autobox> is lexically scoped, and bindings for an outer scope
can be extended or countermanded in a nested scope:
@@ -152,7 +152,7 @@
"Hello, world!"->bar(); # runtime error
-Autoboxing is not performed for barewords i.e.
+Autoboxing is not performed for barewords i.e.
my $foo = Foo->new();
@@ -183,7 +183,7 @@
@array->some_array_method();
-- as no class is specified for the ARRAY type. Note: the result of calling a method
+- as no class is specified for the ARRAY type. Note: the result of calling a method
on a native type that is not associated with a class is the usual runtime error message:
Can't call method "some_array_method" on unblessed reference at ...
@@ -212,7 +212,7 @@
print "Hello, world!"->split->length();
-However, using these default bindings is not recommended as there's no guarantee that another
+However, using these default bindings is not recommended as there's no guarantee that another
piece of code won't trample over the same namespace/methods.
=head1 OPTIONS
@@ -347,13 +347,13 @@
This works:
- use autobox UNDEF => 'MyUndef';
+ use autobox UNDEF => 'MyUndef';
undef->foo(); # ok
So does this:
- use autobox UNDEF => 'MyNamespace::';
+ use autobox UNDEF => 'MyNamespace::';
undef->foo(); # ok
@@ -379,7 +379,7 @@
+- HASH
|
+- CODE
-
+
Thus:
use autobox NUMBER => 'MyNumber';
@@ -537,14 +537,14 @@
type(sub { }) # CODE
C<autobox::universal> is loaded automatically by C<autobox>, and, as its name suggests, can be used to install
-a universal method (i.e. a method for all C<autobox> types) e.g.
+a universal method (i.e. a method for all C<autobox> types) e.g.
use autobox UNIVERSAL => 'autobox::universal';
42->type # INTEGER
3.1415927->type # FLOAT
%ENV->type # HASH
-
+
=head1 CAVEATS
=head2 Performance
@@ -601,7 +601,7 @@
print { 'foo', 'bar', @_ }->foo();
# but this doesn't
- print { @_ }->foo() ? 1 : 0
+ print { @_ }->foo() ? 1 : 0
In the latter case, the solution is to supply something
other than a HASH ref literal as the first argument
@@ -612,20 +612,20 @@
# or
my $hashref = { @_ };
- print $hashref->foo() ? 1 : 0;
+ print $hashref->foo() ? 1 : 0;
# or
- print '', { @_ }->foo() ? 1 : 0;
+ print '', { @_ }->foo() ? 1 : 0;
# or
- print '' . { @_ }->foo() ? 1 : 0;
+ print '' . { @_ }->foo() ? 1 : 0;
# or even
- { @_ }->print_if_foo(1, 0);
+ { @_ }->print_if_foo(1, 0);
=head3 eval EXPR
-Like most pragmas autobox performs some of its operations at compile time, and,
+Like most pragmas, autobox performs operations at compile time, and,
as a result, runtime string C<eval>s are not executed within its scope i.e. this
doesn't work:
@@ -637,18 +637,18 @@
eval <<'EOS';
use autobox;
- 42->foo();
+ 42->foo();
EOS
Note that the C<eval BLOCK> form works as expected:
use autobox;
-
+
eval { 42->foo() }; # OK
-
+
=head1 VERSION
-2.72
+2.73
=head1 SEE ALSO
@@ -665,7 +665,7 @@
=back
=head1 AUTHOR
-
+
chocolateboy <chocolate at cpan.org>
=head1 COPYRIGHT
More information about the Pkg-perl-cvs-commits
mailing list