r77513 - in /trunk/libcache-fastmmap-perl: .shipit Cache-FastMmap-CImpl/ Cache/ Changes FastMmap.pm MANIFEST MANIFEST.SKIP META.yml Makefile.PL README debian/changelog debian/control debian/copyright t/6.t

ansgar at users.alioth.debian.org ansgar at users.alioth.debian.org
Sat Jul 16 09:15:38 UTC 2011 

Author: ansgar
Date: Sat Jul 16 09:15:29 2011
New Revision: 77513

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=77513
Log:
* New upstream release.
* debian/copyright: Minor changes.
* Bump Standards-Version to 3.9.2 (no changes).

Added:
    trunk/libcache-fastmmap-perl/Cache/
      - copied from r77512, branches/upstream/libcache-fastmmap-perl/current/Cache/
    trunk/libcache-fastmmap-perl/MANIFEST.SKIP
      - copied unchanged from r77512, branches/upstream/libcache-fastmmap-perl/current/MANIFEST.SKIP
Removed:
    trunk/libcache-fastmmap-perl/.shipit
    trunk/libcache-fastmmap-perl/Cache-FastMmap-CImpl/
    trunk/libcache-fastmmap-perl/FastMmap.pm
Modified:
    trunk/libcache-fastmmap-perl/Changes
    trunk/libcache-fastmmap-perl/MANIFEST
    trunk/libcache-fastmmap-perl/META.yml
    trunk/libcache-fastmmap-perl/Makefile.PL
    trunk/libcache-fastmmap-perl/README
    trunk/libcache-fastmmap-perl/debian/changelog
    trunk/libcache-fastmmap-perl/debian/control
    trunk/libcache-fastmmap-perl/debian/copyright
    trunk/libcache-fastmmap-perl/t/6.t

Modified: trunk/libcache-fastmmap-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcache-fastmmap-perl/Changes?rev=77513&op=diff
==============================================================================
--- trunk/libcache-fastmmap-perl/Changes (original)
+++ trunk/libcache-fastmmap-perl/Changes Sat Jul 16 09:15:29 2011
@@ -1,4 +1,9 @@
 Revision history for Perl extension Cache::FastMmap.
+
+1.37 Fri Jul 15 16:30 2011
+  - Use a lock object with DESTROY method to avoid
+     an alarm with a die leaving around a locked
+     paged
 
 1.36 Wed Sep 29 13:10 2010
   - Disable wrapping fcntl() lock call in alarm, hurts
@@ -28,7 +33,6 @@
     cache is left at interpreter exit time (required
     Scalar::Util qw(weaken) for object tracking)
 
->>>>>>> .r21903
 1.30 Fri May 8  11:10 2009
   - Fix for Mandriva compiler (thanks Jean-Christian Hassler)
 

Modified: trunk/libcache-fastmmap-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcache-fastmmap-perl/MANIFEST?rev=77513&op=diff
==============================================================================
--- trunk/libcache-fastmmap-perl/MANIFEST (original)
+++ trunk/libcache-fastmmap-perl/MANIFEST Sat Jul 16 09:15:29 2011
@@ -1,19 +1,20 @@
-.shipit
-Cache-FastMmap-CImpl/CImpl.pm
-Cache-FastMmap-CImpl/CImpl.xs
-Cache-FastMmap-CImpl/Makefile.PL
-Cache-FastMmap-CImpl/mmap_cache.c
-Cache-FastMmap-CImpl/mmap_cache.h
-Cache-FastMmap-CImpl/mmap_cache_internals.h
-Cache-FastMmap-CImpl/mmap_cache_test.c
-Cache-FastMmap-CImpl/ppport.h
-Cache-FastMmap-CImpl/README
-Cache-FastMmap-CImpl/unix.c
-Cache-FastMmap-CImpl/win32.c
+Cache/FastMmap.pm
+Cache/FastMmap/CImpl.pm
+Cache/FastMmap/CImpl.xs
+Cache/FastMmap/Makefile.PL
+Cache/FastMmap/mmap_cache.c
+Cache/FastMmap/mmap_cache.h
+Cache/FastMmap/mmap_cache_internals.h
+Cache/FastMmap/mmap_cache_test.c
+Cache/FastMmap/OnLeave.pm
+Cache/FastMmap/ppport.h
+Cache/FastMmap/README
+Cache/FastMmap/unix.c
+Cache/FastMmap/win32.c
 Changes
-FastMmap.pm
 Makefile.PL
 MANIFEST			This list of files
+MANIFEST.SKIP
 META.yml
 README
 t/1.t

Modified: trunk/libcache-fastmmap-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcache-fastmmap-perl/META.yml?rev=77513&op=diff
==============================================================================
--- trunk/libcache-fastmmap-perl/META.yml (original)
+++ trunk/libcache-fastmmap-perl/META.yml Sat Jul 16 09:15:29 2011
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:                Cache-FastMmap
-version:             1.36
+version:             1.37
 abstract:            Uses an mmap'ed file to act as a shared memory interprocess cache
 license:             ~
 author:              

Modified: trunk/libcache-fastmmap-perl/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcache-fastmmap-perl/Makefile.PL?rev=77513&op=diff
==============================================================================
--- trunk/libcache-fastmmap-perl/Makefile.PL (original)
+++ trunk/libcache-fastmmap-perl/Makefile.PL Sat Jul 16 09:15:29 2011
@@ -3,14 +3,14 @@
 
 WriteMakefile(
     'NAME'          => 'Cache::FastMmap',
-    'VERSION_FROM'  => 'FastMmap.pm',
-    'ABSTRACT_FROM' => 'FastMmap.pm',
+    'VERSION_FROM'  => 'Cache/FastMmap.pm',
+    'ABSTRACT_FROM' => 'Cache/FastMmap.pm',
     'AUTHOR'        => 'Rob Mueller <cpan at robm.fastmail.fm>',
     'PREREQ_PM'     => {
       'Storable' => 0,
     },
     'DIR'           => [
-      'Cache-FastMmap-CImpl'
+      'Cache/FastMmap'
     ],
 #	    'OPTIMIZE' => '-g -DDEBUG -ansi -pedantic',
 );

Modified: trunk/libcache-fastmmap-perl/README
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcache-fastmmap-perl/README?rev=77513&op=diff
==============================================================================
--- trunk/libcache-fastmmap-perl/README (original)
+++ trunk/libcache-fastmmap-perl/README Sat Jul 16 09:15:29 2011
@@ -23,9 +23,15 @@
 
 Rob Mueller <cpan at robm.fastmail.fm>
 
+DOCUMENTATION
+
+See the POD documentation. Viewable online at CPAN
+
+http://search.cpan.org/~robm/Cache-FastMmap/
+
 COPYRIGHT AND LICENCE
 
-Copyright (C) 2003-2010 by The FastMail Partnership
+Copyright (C) 2003-2011 by Opera Software Australia Pty Ltd
 
 This library is free software; you can redistribute it and/or modify
 it under the same terms as Perl itself. 

Modified: trunk/libcache-fastmmap-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcache-fastmmap-perl/debian/changelog?rev=77513&op=diff
==============================================================================
--- trunk/libcache-fastmmap-perl/debian/changelog (original)
+++ trunk/libcache-fastmmap-perl/debian/changelog Sat Jul 16 09:15:29 2011
@@ -1,8 +1,11 @@
-libcache-fastmmap-perl (1.36-2) UNRELEASED; urgency=low
-
+libcache-fastmmap-perl (1.37-1) unstable; urgency=low
+
+  * New upstream release.
+  * debian/copyright: Minor changes.
   * Update my email address.
-
- -- Ansgar Burchardt <ansgar at debian.org>  Mon, 01 Nov 2010 11:16:20 +0100
+  * Bump Standards-Version to 3.9.2 (no changes).
+
+ -- Ansgar Burchardt <ansgar at debian.org>  Sat, 16 Jul 2011 11:15:23 +0200
 
 libcache-fastmmap-perl (1.36-1) unstable; urgency=low
 

Modified: trunk/libcache-fastmmap-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcache-fastmmap-perl/debian/control?rev=77513&op=diff
==============================================================================
--- trunk/libcache-fastmmap-perl/debian/control (original)
+++ trunk/libcache-fastmmap-perl/debian/control Sat Jul 16 09:15:29 2011
@@ -6,7 +6,7 @@
 Uploaders: Krzysztof Krzyżaniak (eloy) <eloy at debian.org>,
  Jonathan Yu <jawnsy at cpan.org>, gregor herrmann <gregoa at debian.org>,
  Ansgar Burchardt <ansgar at debian.org>
-Standards-Version: 3.9.1
+Standards-Version: 3.9.2
 Homepage: http://search.cpan.org/dist/Cache-FastMmap/
 Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libcache-fastmmap-perl/
 Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libcache-fastmmap-perl/

Modified: trunk/libcache-fastmmap-perl/debian/copyright
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcache-fastmmap-perl/debian/copyright?rev=77513&op=diff
==============================================================================
--- trunk/libcache-fastmmap-perl/debian/copyright (original)
+++ trunk/libcache-fastmmap-perl/debian/copyright Sat Jul 16 09:15:29 2011
@@ -3,23 +3,25 @@
 Source: http://search.cpan.org/dist/Cache-FastMmap/
 Name: Cache-FastMmap
 
+Files: *
 Copyright: 2003-2010, The FastMail Partnership
 License: Artistic or GPL-1+
 
-Files: Cache-FastMmap-CImpl/win32.c
+Files: Cache/FastMmap/win32.c
 Copyright: 2007, Ash Berlin
 License: Artistic or GPL-1+
 
-Files: ppport.h
-Copyright: 2004-2009, Marcus Holland-Moritz <mhx-cpan at gmx.net>
+Files: Cache/FastMmap/ppport.h
+Copyright:
  2001, Paul Marquess <pmqs at cpan.org> (Version 2.x)
  1999, Kenneth Albanowski <kjahds at kjahds.com> (Version 1.x)
 License: Artistic or GPL-1+
 
 Files: debian/*
-Copyright: 2009, Jonathan Yu <jawnsy at cpan.org>
+Copyright:
+ 2009, Jonathan Yu <jawnsy at cpan.org>
  2009, gregor hermann <gregoa at debian.org>
- 2009, Ansgar Burchardt <ansgar at debian.org>
+ 2009-2011, Ansgar Burchardt <ansgar at debian.org>
  2005-2009, Krzysztof Krzyzaniak (eloy) <eloy at debian.org>
 License: Artistic or GPL-1+
 

Modified: trunk/libcache-fastmmap-perl/t/6.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libcache-fastmmap-perl/t/6.t?rev=77513&op=diff
==============================================================================
--- trunk/libcache-fastmmap-perl/t/6.t (original)
+++ trunk/libcache-fastmmap-perl/t/6.t Sat Jul 16 09:15:29 2011
@@ -28,10 +28,10 @@
 $FC = Cache::FastMmap->new(init_file => 0, raw_values => 1);
 $FC = undef;
 
-TestLeak(\&NewLeak);
-TestLeak(\&NewLeak);
-TestLeak(\&NewLeak2);
-TestLeak(\&NewLeak2);
+TestLeak(\&NewLeak, "new - 1");
+TestLeak(\&NewLeak, "new - 2");
+TestLeak(\&NewLeak2, "new2 - 1");
+TestLeak(\&NewLeak2, "new2 - 2");
 
 $FC = Cache::FastMmap->new(
   init_file => 1,
@@ -56,15 +56,15 @@
 our $Val = "\x{263A}" . RandStr(17);
 
 our $StartKey = 1;
-TestLeak(\&SetLeak);
+TestLeak(\&SetLeak, "set");
 
 $StartKey = 1;
-TestLeak(\&GetLeak);
+TestLeak(\&GetLeak, "get");
 
 $FC->clear();
 
 $StartKey = 1;
-TestLeak(\&SetLeak);
+TestLeak(\&SetLeak, "set2");
 
 our (@a, @b, @c);
 @a = $FC->get_keys(0);
@@ -73,7 +73,7 @@
 @a = @b = @c = ();
 
 ListLeak();
-TestLeak(\&ListLeak);
+TestLeak(\&ListLeak, "list");
 
 sub RandStr {
   return join '', map { chr(ord('a') + rand(26)) } (1 .. $_[0]);
@@ -81,6 +81,7 @@
 
 sub TestLeak {
   my $Sub = shift;
+  my $Test = shift;
 
   my $Before = $GTop->proc_mem($$)->size;
   eval {
@@ -92,7 +93,7 @@
   my $After = $GTop->proc_mem($$)->size;
 
   my $Extra = ($After - $Before)/1024;
-  ok( $Extra < 30, "leak test $Extra > 30k");
+  ok( $Extra < 30, "leak test $Extra > 30k - $Test");
 }
 
 sub NewLeak {

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