in reply to Re^2: X-platform testers wanted: new version of Devel::Size
in thread X-platform testers wanted: new version of Devel::Size

Unfortunately new version (0.71) does not fix this issue. And in fact, if this was fixed, I think the the related bug was closed too :) Here is a little sample that'll crash your perl: 
perl -wle "use strict;use Devel::Size qw(total_size);my$t=sub{my$x='';
+};print total_size($t);"

[download]
You'll see something like: 
Free to wrong pool 286ee8 not 286f30.

[download]
And perhaps a Windows crash dialogue (if you didn't disable it).

Replies are listed 'Best First'.
Re^4: X-platform testers wanted: new version of Devel::Size
by BrowserUk (Patriarch) on Oct 03, 2008 at 05:47 UTC
[reply]
      Thanks, that was quick :)

      Btw, I thought that "Free to wrong pool" errors were only related to threads, but I got this crash too on a non-threaded perl under linux and Devel::Size does not seem to use threads at all. So, it looks like either my info is wrong or I'm missing something. Can you give some info on the cause?

      Anything else you are aware of?
      Nope. That was the biggest (and only I guess) problem I've faced since it crashes (which can not be handled by eval {}) instead of die()ing (which can be handled by eval{})
[reply]
        that was quick :)

        Turned out to be a classic = vs. == typo. 

            if ((o->op_type = OP_TRANS)) {
      return OPc_BASEOP;
    }

        [download]

        I knew something had to be modifying something it shouldn't be, but I couldn't see it until I threw a little const at it. Then the compiler told me where to look. Which was nice :)

        So, can I sign you up as a tester? All it involves is installing it where you are and trying it. (And letting me know how you fared.)

        Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
        "Science is about questioning the status quo. Questioning authority".
        In the absence of evidence, opinion is indistinguishable from prejudice.
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom