develooper Front page | perl.perl5.porters | Postings from August 2003

Re: Storable Error

Thread Previous | Thread Next
From:
Abhijit Menon-Sen
Date:
August 6, 2003 14:38
Subject:
Re: Storable Error
Message ID:
20030807030835.A24518@lustre.dyn.wiw.org
At 2003-07-23 16:01:19 -0400, vbono@vinny.org wrote:
>
> Assertion flags == 0 failed: file "Storable.xs", line 2336

The appended patch (relative to Storable 2.07) appears to paper over the
problem. I have no convenient way to investigate this further, so could
someone please:

    1. Confirm that the assertion failure goes away with the patch, and
    2. Explain why the hash in question has HvHASKFLAGS_off, although a
       key therein has HEK_WASUTF8 set?

Oh, and could everyone who thought restricted hashes were a good idea
contact me off list to schedule a meeting in a dark and lonely alley?
(One at a time, that is.)

-- ams

--- Storable.xs~        Wed Aug  6 23:23:59 2003
+++ Storable.xs Wed Aug  6 23:02:17 2003
@@ -2322,7 +2322,7 @@
 #ifdef HAS_HASH_KEY_FLAGS
                             if (HEK_UTF8(hek))
                                 flags |= SHV_K_UTF8;
-                            if (HEK_WASUTF8(hek))
+                            if (HEK_WASUTF8(hek) && flagged_hash)
                                 flags |= SHV_K_WASUTF8;
 #endif
                             key = HEK_KEY(hek);

Thread Previous | Thread Next


nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About