Overload Segfaulting

[Ovid <publiustemp-p5p3@yahoo.com>]

I sent this via perlbug, but our Solaris box can be flaky, so I'm
resending manually.  Apologies if this is sent more than once.

The following segfaults on Solaris, Ubuntu 7.10 and Windows (all of
whom are running 5.8.8).  Seems like a fairly universal failure.

  use strict;
  use warnings;

  {
      package Some::Package;
 
      use overload
          '++'     => sub { print "object is $_[0]\n" },
          fallback => 1;

      sub new { bless {} => shift }
  }

  my $object = Some::Package->new;
  print $object++;

Cheers,
Ovid

--
Buy the book  - http://www.oreilly.com/catalog/perlhks/
Personal blog - http://publius-ovidius.livejournal.com/
Tech blog     - http://use.perl.org/~Ovid/journal/

---

Follow-Ups from:

"Jerry D. Hedden" <jdhedden@cpan.org>

---

[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index][Thread Index][Top&Search][Original]

---