New issue
Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.
By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.
Already on GitHub? Sign in to your account
overload recursion not trapped #1795
Comments
From pcg@goof.comCreated by root@cerebro.laendleuse overload '""' => sub { "$_[0]" }; The above will lead to a segmentation fault: 0x80a1d87 in Perl_newAV () at av.c:310 Actually, in different circumstances it breaks at different addresses, so The obvious cause for that behaviour is that the stringification function I still think segfaulting is a bad thing, since this error is easy to sub as_string { my $self = shift; "$self->{error}\n$self-{info}\n" } HTH, Perl Info
|
From @ysthIn article <20000407070043.A22407@cerebro.laendle>,
FWIW, Larry indicated that he wants -> to interpolate, thus making Wasn't clear if he meant for Topaz or 5.x. If 5.x, any volunteers to start the new development series (5.7.0?) |
From [Unknown Contact. See original ticket]On Fri, Apr 07, 2000 at 12:02:50PM -0700, Yitzchak Scott-Thoennes <sthoenna@efn.org> wrote:
-> already interpolates. You just proved that this error is easy to |
From @schwernConfirm, still a problem in 5.8.6/bleadperl. |
From stas@stason.orgCreated by stas@rabbit.stason.orgWhile writing some quick test I've noticed that the following program package A; use overload package main; my $a = A->new; __END__ % perl-5.8.7 -l /tmp/segfault (happens with other perls too) (gdb) bt looks like a recursive loop caused by warn(). not sure if perl can protect Perl Info
|
From @ysthOn Fri, Mar 04, 2005 at 03:50:33AM -0000, Stas Bekman wrote:
Not a comment on the bug (which I can't duplicate on cygwin), but |
The RT System itself - Status changed from 'new' to 'open' |
From stas@stason.orgYitzchak Scott-Thoennes wrote:
Yes, thanks Yitzchak, but as you said, this is not the cause of the segfault. -- |
From reisub@ya.ruCreated by reisub@ya.ruCode snippet that throw segfault: #!/usr/bin/perl { my $o = Test::new(); print $o; # segmentation fault here <<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< We have a deep recursion, but general usage don't throw segfaults. Perl Info
|
From zefram@fysh.orgreisub wrote:
Yeah. That's because deep recursion of ordinary subs happens on the -zefram |
The RT System itself - Status changed from 'new' to 'open' |
From glitchmr@myopera.comMessage RFC822: This is a bug report for perl from glitchmr@myopera.com, [Please describe your issue here] Following code causes SIGSEGV. Neither changing package or blessed
[Please do not change anything below this line]Flags:
|
From glitchmr@myopera.comCreated by glitchmr@myopera.comFollowing code causes SIGSEGV. Neither changing package or blessed use strict; Perl Info
|
From @shlomif
I can reproduce this with: Summary of my perl5 (revision 5 version 16 subversion 1) configuration: Characteristics of this binary (from libperl): Also with: Summary of my perl5 (revision 5 version 16 subversion 0) configuration: Characteristics of this binary (from libperl): Also with: Summary of my perl5 (revision 5 version 14 subversion 2) configuration: Characteristics of this binary (from libperl): I'm on Mageia Linux 3/Cauldron on x86-64 . |
The RT System itself - Status changed from 'new' to 'open' |
From q@cono.org.uaLooks like the same issue with the following code: #! /usr/bin/perl package Obj; use overload '""' => \&mysub; sub new { sub mysub { package main; use Data::Dumper; my $x = Obj->new; my $h = { $x }; |
From q@cono.org.uaCreated by cono@claptop.LYV.LiveNation.comThis is a bug report for perl from cono@claptop.LYV.LiveNation.com, Following program gives me segfault. package Obj; use overload '""' => \&mysub; sub new { sub mysub { package main; use Data::Dumper; my $x = Obj->new; my $h = { $x }; Perl Info
|
From [Unknown Contact. See original ticket]Looks like the same issue with the following code: #! /usr/bin/perl package Obj; use overload '""' => \&mysub; sub new { sub mysub { package main; use Data::Dumper; my $x = Obj->new; my $h = { $x }; |
From zefram@fysh.orgThe test case in this ticket is not merely recursing deeply on the C -zefram |
@cpansprout - Status changed from 'open' to 'rejected' |
Migrated from rt.perl.org#3054 (status was 'rejected')
Searchable as RT3054$
The text was updated successfully, but these errors were encountered: