r22595 - in /branches/upstream/libcache-fastmmap-perl/current: Cache-FastMmap-CImpl/CImpl.pm Changes FastMmap.pm META.yml

Tue Jul 1 09:20:03 UTC 2008

Author: eloy
Date: Tue Jul  1 09:20:03 2008
New Revision: 22595

URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=22595
Log:
[svn-upgrade] Integrating new upstream version, libcache-fastmmap-perl (1.28)

Modified:
    branches/upstream/libcache-fastmmap-perl/current/Cache-FastMmap-CImpl/CImpl.pm
    branches/upstream/libcache-fastmmap-perl/current/Changes
    branches/upstream/libcache-fastmmap-perl/current/FastMmap.pm
    branches/upstream/libcache-fastmmap-perl/current/META.yml

Modified: branches/upstream/libcache-fastmmap-perl/current/Cache-FastMmap-CImpl/CImpl.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcache-fastmmap-perl/current/Cache-FastMmap-CImpl/CImpl.pm?rev=22595&op=diff
==============================================================================

--- branches/upstream/libcache-fastmmap-perl/current/Cache-FastMmap-CImpl/CImpl.pm (original)
+++ branches/upstream/libcache-fastmmap-perl/current/Cache-FastMmap-CImpl/CImpl.pm Tue Jul  1 09:20:03 2008
@@ -15,7 +15,7 @@
 use strict;
 use warnings;
 
-our $VERSION = '1.27';
+our $VERSION = '1.28';
 
 require XSLoader;
 XSLoader::load('Cache::FastMmap::CImpl', $VERSION);

Modified: branches/upstream/libcache-fastmmap-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcache-fastmmap-perl/current/Changes?rev=22595&op=diff
==============================================================================
--- branches/upstream/libcache-fastmmap-perl/current/Changes (original)
+++ branches/upstream/libcache-fastmmap-perl/current/Changes Tue Jul  1 09:20:03 2008
@@ -1,4 +1,8 @@
 Revision history for Perl extension Cache::FastMmap.
+
+1.28 Fri Jun 27 11:05 2008
+  - get_and_set() returns new value + didstore boolean
+     if called in list context
 
 1.27  Wed Jun 18 17:15 2008
   - Fix non-ansi C code

Modified: branches/upstream/libcache-fastmmap-perl/current/FastMmap.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcache-fastmmap-perl/current/FastMmap.pm?rev=22595&op=diff
==============================================================================
--- branches/upstream/libcache-fastmmap-perl/current/FastMmap.pm (original)
+++ branches/upstream/libcache-fastmmap-perl/current/FastMmap.pm Tue Jul  1 09:20:03 2008
@@ -283,7 +283,7 @@
 use warnings;
 use bytes;
 
-our $VERSION = '1.27';
+our $VERSION = '1.28';
 
 use Cache::FastMmap::CImpl;
 
@@ -748,8 +748,13 @@
 
   $Cache->get_and_set($Key, sub { return ++$_[1]; });
 
-The return value from this function is the new value stored back
-into the cache.
+In scalar context, the return value from this function is the *new* value
+stored back into the cache.
+
+In list context, a two item array is returned; the new value stored
+back into the cache and a boolean that's true if the value was stored
+in the cache, false otherwise. See the PAGE SIZE AND KEY/VALUE LIMITS
+section for more details.
 
 Notes:
 
@@ -763,7 +768,7 @@
 =item *
 
 If your sub does a die/throws an exception, this will be caught
-to allow the pack to be unlocked, and then rethrown (1.15 onwards)
+to allow the page to be unlocked, and then rethrown (1.15 onwards)
 
 =back
 
@@ -774,10 +779,10 @@
   my $Value = $Self->get($_[1], { skip_unlock => 1 });
   eval { $Value = $_[2]->($_[1], $Value); };
   my $Err = $@;
-  $Self->set($_[1], $Value, { skip_lock => 1 });
+  my $DidStore = $Self->set($_[1], $Value, { skip_lock => 1 });
   die $Err if $Err;
 
-  return $Value;
+  return wantarray ? ($Value, $DidStore) : $Value;
 }
 
 =item I<remove($Key, [ \%Options ])>

Modified: branches/upstream/libcache-fastmmap-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libcache-fastmmap-perl/current/META.yml?rev=22595&op=diff
==============================================================================
--- branches/upstream/libcache-fastmmap-perl/current/META.yml (original)
+++ branches/upstream/libcache-fastmmap-perl/current/META.yml Tue Jul  1 09:20:03 2008
@@ -1,7 +1,7 @@
 # http://module-build.sourceforge.net/META-spec.html
 #XXXXXXX This is a prototype!!!  It will change in the future!!! XXXXX#
 name:         Cache-FastMmap
-version:      1.27
+version:      1.28
 version_from: FastMmap.pm
 installdirs:  site
 requires:


