[Bug 114271] 'Attempt to free unreferenced scalar' bug in perl

[bugzilla at redhat.com]

Please do not reply directly to this email. All additional
comments should be made in the comments box of this bug report.

Summary: 'Attempt to free unreferenced scalar' bug in perl


https://bugzilla.redhat.com/show_bug.cgi?id=114271





------- Additional Comments From ed at membled.com  2007-10-25 08:43 EST -------
FTR, Joris van Rantwijk in Debian bug 230844
<http://bugs.debian.org/cgi-bin/bugreport.cgi?bug=230844> discovered that
XML::Parser is not guilty.  You can still reproduce the bug using test_program
attached above and the following code for test_library:

package Fred;
sub new {
    my ($class, %args) = @_;
    my $handlers = $args{Key};
    bless $handlers;
}
sub parse {
  my ($self, $s) = @_;
  $self->{'/a'}->($self, 'Fred::Foo'->bar($self));
}
package Fred::Foo;
sub bar {
    my $class= shift;
}
sub children {
    my $elt= shift;
}
1;

-- 
Configure bugmail: https://bugzilla.redhat.com/userprefs.cgi?tab=email
------- You are receiving this mail because: -------
You are on the CC list for the bug, or are watching someone who is.