r64477 - in /trunk/libclass-xsaccessor-perl: Changes MANIFEST META.yml debian/changelog lib/Class/XSAccessor.pm lib/Class/XSAccessor/Array.pm lib/Class/XSAccessor/Heavy.pm t/03hash_predicate.t t/50reentrant_goto_sigsegv.t

periapt-guest at users.alioth.debian.org periapt-guest at users.alioth.debian.org
Mon Nov 1 21:37:22 UTC 2010


Author: periapt-guest
Date: Mon Nov  1 21:37:06 2010
New Revision: 64477

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=64477
Log:
New upstream release

Added:
    trunk/libclass-xsaccessor-perl/t/50reentrant_goto_sigsegv.t
      - copied unchanged from r64476, branches/upstream/libclass-xsaccessor-perl/current/t/50reentrant_goto_sigsegv.t
Modified:
    trunk/libclass-xsaccessor-perl/Changes
    trunk/libclass-xsaccessor-perl/MANIFEST
    trunk/libclass-xsaccessor-perl/META.yml
    trunk/libclass-xsaccessor-perl/debian/changelog
    trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor.pm
    trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor/Array.pm
    trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor/Heavy.pm
    trunk/libclass-xsaccessor-perl/t/03hash_predicate.t

Modified: trunk/libclass-xsaccessor-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libclass-xsaccessor-perl/Changes?rev=64477&op=diff
==============================================================================
--- trunk/libclass-xsaccessor-perl/Changes (original)
+++ trunk/libclass-xsaccessor-perl/Changes Mon Nov  1 21:37:06 2010
@@ -1,4 +1,10 @@
 Revision history for Perl extension Class-XSAccessor.
+
+1.09  Sun Oct 31 12:45 2010
+  - Fix #62531: Predicates return value, not bool (SJOHNSTON)
+  - TODO test for perl-crashing bug (in perl) that can happen
+    on (arcane) XSUB aliasing on perl's < 5.8.9 (Peter Rabbitson)
+    We're open for work-around patches.
 
 1.08  Fri Sep 17 20:30 2010
   - Promote latest development release to a stable release.

Modified: trunk/libclass-xsaccessor-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libclass-xsaccessor-perl/MANIFEST?rev=64477&op=diff
==============================================================================
--- trunk/libclass-xsaccessor-perl/MANIFEST (original)
+++ trunk/libclass-xsaccessor-perl/MANIFEST Mon Nov  1 21:37:06 2010
@@ -34,6 +34,7 @@
 t/39array_lvalue.t
 t/40hash_bad_call.t
 t/41array_bad_call.t
+t/50reentrant_goto_sigsegv.t
 t/80threadbomb.t
 XS/Array.xs
 XS/Hash.xs

Modified: trunk/libclass-xsaccessor-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libclass-xsaccessor-perl/META.yml?rev=64477&op=diff
==============================================================================
--- trunk/libclass-xsaccessor-perl/META.yml (original)
+++ trunk/libclass-xsaccessor-perl/META.yml Mon Nov  1 21:37:06 2010
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:               Class-XSAccessor
-version:            1.08
+version:            1.09
 abstract:           Generate fast XS accessors without runtime compilation
 author:
     - Steffen Mueller <smueller at cpan.org>

Modified: trunk/libclass-xsaccessor-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libclass-xsaccessor-perl/debian/changelog?rev=64477&op=diff
==============================================================================
--- trunk/libclass-xsaccessor-perl/debian/changelog (original)
+++ trunk/libclass-xsaccessor-perl/debian/changelog Mon Nov  1 21:37:06 2010
@@ -1,8 +1,12 @@
-libclass-xsaccessor-perl (1.08-2) UNRELEASED; urgency=low
+libclass-xsaccessor-perl (1.09-1) UNRELEASED; urgency=low
 
+  [ Ansgar Burchardt ]
   * Update my email address.
 
- -- Ansgar Burchardt <ansgar at debian.org>  Mon, 01 Nov 2010 11:16:27 +0100
+  [ Nicholas Bamber ]
+  * New upstream release
+
+ -- Nicholas Bamber <nicholas at periapt.co.uk>  Mon, 01 Nov 2010 21:37:18 +0000
 
 libclass-xsaccessor-perl (1.08-1) unstable; urgency=low
 

Modified: trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor.pm?rev=64477&op=diff
==============================================================================
--- trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor.pm (original)
+++ trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor.pm Mon Nov  1 21:37:06 2010
@@ -6,7 +6,7 @@
 use Class::XSAccessor::Heavy;
 use XSLoader;
 
-our $VERSION = '1.08';
+our $VERSION = '1.09';
 
 XSLoader::load('Class::XSAccessor', $VERSION);
 
@@ -49,7 +49,7 @@
                         ["accessor", $acc_subs],
                         ["lvalue_accessor", $lvacc_subs],
                         ["test", $test_subs],
-                        ["pred_subs", $pred_subs] )
+                        ["predicate", $pred_subs] )
   {
     my $subs = $subtype->[1];
     foreach my $subname (keys %$subs) {

Modified: trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor/Array.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor/Array.pm?rev=64477&op=diff
==============================================================================
--- trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor/Array.pm (original)
+++ trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor/Array.pm Mon Nov  1 21:37:06 2010
@@ -6,7 +6,7 @@
 use Class::XSAccessor;
 use Class::XSAccessor::Heavy;
 
-our $VERSION = '1.08';
+our $VERSION = '1.09';
 
 sub import {
   my $own_class = shift;

Modified: trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor/Heavy.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor/Heavy.pm?rev=64477&op=diff
==============================================================================
--- trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor/Heavy.pm (original)
+++ trunk/libclass-xsaccessor-perl/lib/Class/XSAccessor/Heavy.pm Mon Nov  1 21:37:06 2010
@@ -6,7 +6,7 @@
 use warnings;
 use Carp;
 
-our $VERSION  = '1.08';
+our $VERSION  = '1.09';
 our @CARP_NOT = qw(
         Class::XSAccessor
         Class::XSAccessor::Array

Modified: trunk/libclass-xsaccessor-perl/t/03hash_predicate.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libclass-xsaccessor-perl/t/03hash_predicate.t?rev=64477&op=diff
==============================================================================
--- trunk/libclass-xsaccessor-perl/t/03hash_predicate.t (original)
+++ trunk/libclass-xsaccessor-perl/t/03hash_predicate.t Mon Nov  1 21:37:06 2010
@@ -5,9 +5,9 @@
 
 use Class::XSAccessor
   accessors  => { bar => 'bar' },
-  getters    => { get_foo => 'foo' },
+  getters    => { get_foo => 'foo', get_zero => 'zero' },
   setters    => { set_foo => 'foo' },
-  predicates => { has_foo => 'foo', has_bar => 'bar' };
+  predicates => { has_foo => 'foo', has_bar => 'bar', has_zero => 'zero' };
 
 use Class::XSAccessor
   predicates => 'single';
@@ -16,12 +16,12 @@
 
 sub new {
   my $class = shift;
-  bless { bar => 'baz' }, $class;
+  bless { bar => 'baz', zero => 0 }, $class;
 }
 
 package main;
 
-use Test::More tests => 18;
+use Test::More tests => 20;
 
 my $obj = Class::XSAccessor::Test->new();
 
@@ -43,6 +43,9 @@
 ok(!$obj->has_foo());
 ok(!$obj->has_bar());
 
+is($obj->get_zero, 0);
+ok($obj->has_zero);
+
 ok(!$obj->single);
 ok(!$obj->mult);
 ok(!$obj->iple);




More information about the Pkg-perl-cvs-commits mailing list