This is 0.20

diff --git a/Changes b/Changes
index 93ec114b01c278e119f8db73eab65d091402e204..771c22e71a74d45517c90372f7e9a7daf26e1d20 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,5 +1,13 @@
 Revision history for Variable-Magic
 
+0.20    2008-09-20 23:35 UTC
+        + Fix : The module is now thread safe. You can test if it had been
+                built with thread safety features enabled through the
+                VMG_THREADSAFE constant.
+        + Fix : Correct backtrace when wizard() croaks.
+        + Fix : 'cast $a, undef' should throw an 'invalid wizard' error instead
+                of an 'invalid signature'.
+
 0.19    2008-07-05 15:05 UTC
         + Add : The patchlevel with which the module has been built is now
                 exported with the VMG_PERL_PATCHLEVEL constant.

diff --git a/META.yml b/META.yml
index b39c89a3b00408543d6cc06ed41f91755d9e1c05..cac5360bf6afcb30d20037b70deabe49ee6bac87 100644 (file)
--- a/META.yml
+++ b/META.yml
@@ -1,6 +1,6 @@
 --- #YAML:1.0
 name:                Variable-Magic
-version:             0.19
+version:             0.20
 abstract:            Associate user-defined magic to variables from Perl.
 license:             perl
 author:              

diff --git a/README b/README
index e84cd2f2435cd93e0f159ff7e92ef5a8af0bd02c..7e89615a996e668ab39c2fa058d18332108a96c8 100644 (file)
--- a/README
+++ b/README
@@ -2,7 +2,7 @@ NAME
     Variable::Magic - Associate user-defined magic to variables from Perl.
 
 VERSION
-    Version 0.19
+    Version 0.20
 
 SYNOPSIS
         use Variable::Magic qw/wizard cast dispell/;
@@ -23,43 +23,51 @@ DESCRIPTION
 
     The operations that can be overloaded are :
 
-    "get"
+    *   "get"
+
         This magic is invoked when the variable is evaluated (does not
         include array/hash subscripts and slices).
 
-    "set"
+    *   "set"
+
         This one is triggered each time the value of the variable changes
         (includes array/hash subscripts and slices).
 
-    "len"
+    *   "len"
+
         This magic is a little special : it is called when the 'size' or the
         'length' of the variable has to be known by Perl. Typically, it's
         the magic involved when an array is evaluated in scalar context, but
         also on array assignation and loops ("for", "map" or "grep"). The
         callback has then to return the length as an integer.
 
-    "clear"
+    *   "clear"
+
         This magic is invoked when the variable is reset, such as when an
         array is emptied. Please note that this is different from undefining
         the variable, even though the magic is called when the clearing is a
         result of the undefine (e.g. for an array, but actually a bug
         prevent it to work before perl 5.9.5 - see the history).
 
-    "free"
+    *   "free"
+
         This one can be considered as an object destructor. It happens when
         the variable goes out of scope (with the exception of global scope),
         but not when it is undefined.
 
-    "copy"
+    *   "copy"
+
         This magic only applies to tied arrays and hashes. It fires when you
         try to access or change their elements. It is available on your perl
         iff "MGf_COPY" is true.
 
-    "dup"
+    *   "dup"
+
         Invoked when the variable is cloned across threads. Currently not
         available.
 
-    "local"
+    *   "local"
+
         When this magic is set on a variable, all subsequent localizations
         of the variable will trigger the callback. It is available on your
         perl iff "MGf_LOCAL" is true.
@@ -67,16 +75,20 @@ DESCRIPTION
     The following actions only apply to hashes and are available iff
     "VMG_UVAR" is true. They are referred to as "uvar" magics.
 
-    "fetch"
+    *   "fetch"
+
         This magic happens each time an element is fetched from the hash.
 
-    "store"
+    *   "store"
+
         This one is called when an element is stored into the hash.
 
-    "exists"
+    *   "exists"
+
         This magic fires when a key is tested for existence in the hash.
 
-    "delete"
+    *   "delete"
+
         This last one triggers when a key is deleted in the hash, regardless
         of whether the key actually exists in it.
 
@@ -91,27 +103,34 @@ PERL MAGIC HISTORY
     The places where magic is invoked have changed a bit through perl
     history. Here's a little list of the most recent ones.
 
-  5.6.x
-    *p14416* : 'copy' and 'dup' magic.
+    *   5.6.x
 
-  5.9.3
-    *p25854* : 'len' magic is no longer called when pushing an element into
-    a magic array.
-    *p26569* : 'local' magic.
+        *p14416* : 'copy' and 'dup' magic.
 
-  5.9.5
-    *p31064* : Meaningful 'uvar' magic.
-    *p31473* : 'clear' magic wasn't invoked when undefining an array. The
-    bug is fixed as of this version.
+    *   5.9.3
 
-  5.10.0
-    Since "PERL_MAGIC_uvar" is uppercased, "hv_magic_check()" triggers
-    'copy' magic on hash stores for (non-tied) hashes that also have 'uvar'
-    magic.
+        *p25854* : 'len' magic is no longer called when pushing an element
+        into a magic array.
 
-  5.11.x
-    *p32969* : 'len' magic is no longer invoked when calling "length" with a
-    magical scalar.
+        *p26569* : 'local' magic.
+
+    *   5.9.5
+
+        *p31064* : Meaningful 'uvar' magic.
+
+        *p31473* : 'clear' magic wasn't invoked when undefining an array.
+        The bug is fixed as of this version.
+
+    *   5.10.0
+
+        Since "PERL_MAGIC_uvar" is uppercased, "hv_magic_check()" triggers
+        'copy' magic on hash stores for (non-tied) hashes that also have
+        'uvar' magic.
+
+    *   5.11.x
+
+        *p32969* : 'len' magic is no longer invoked when calling "length"
+        with a magical scalar.
 
 CONSTANTS
   "SIG_MIN"
@@ -151,6 +170,10 @@ CONSTANTS
     The perl patchlevel this module was built with, or 0 for non-debugging
     perls.
 
+  "VMG_THREADSAFE"
+    True iff this module could have been built with thread-safety features
+    enabled.
+
 FUNCTIONS
   "wizard"
         wizard sig    => ...,
@@ -171,20 +194,23 @@ FUNCTIONS
     information. It takes a list of keys / values as argument, whose keys
     can be :
 
-    "sig"
+    *   "sig"
+
         The numerical signature. If not specified or undefined, a random
         signature is generated. If the signature matches an already defined
         magic, then the existant magic object is returned.
 
-    "data"
+    *   "data"
+
         A code reference to a private data constructor. It is called each
         time this magic is cast on a variable, and the scalar returned is
         used as private data storage for it. $_[0] is a reference to the
         magic object and @_[1 .. @_-1] are all extra arguments that were
         passed to "cast".
 
-    "get", "set", "len", "clear", "free", "copy", "local", "fetch", "store",
-    "exists" and "delete"
+    *   "get", "set", "len", "clear", "free", "copy", "local", "fetch",
+        "store", "exists" and "delete"
+
         Code references to corresponding magic callbacks. You don't have to
         specify all of them : the magic associated with undefined entries
         simply won't be hooked. In those callbacks, $_[0] is always a
@@ -288,6 +314,8 @@ DEPENDENCIES
 
     Glob tests need Symbol (standard since perl 5.002).
 
+    Threads tests need threads and threads::shared.
+
 SEE ALSO
     perlguts and perlapi for internal information about magic.
 

diff --git a/lib/Variable/Magic.pm b/lib/Variable/Magic.pm
index af2762db066577e372fc7b918b593c468a377490..7bb41745ebc13de5cdf46310b0887696703c53b0 100644 (file)
--- a/lib/Variable/Magic.pm
+++ b/lib/Variable/Magic.pm
@@ -13,13 +13,13 @@ Variable::Magic - Associate user-defined magic to variables from Perl.
 
 =head1 VERSION
 
-Version 0.19
+Version 0.20
 
 =cut
 
 our $VERSION;
 BEGIN {
- $VERSION = '0.19';
+ $VERSION = '0.20';
 }
 
 =head1 SYNOPSIS
@@ -373,6 +373,8 @@ Some uvar tests need L<Hash::Util::FieldHash> (standard since perl 5.009004).
 
 Glob tests need L<Symbol> (standard since perl 5.002).
 
+Threads tests need L<threads> and L<threads::shared>.
+
 =head1 SEE ALSO
 
 L<perlguts> and L<perlapi> for internal information about magic.