develooper Front page | perl.perl5.porters | Postings from September 2016

[perl #128263] Assert fail in Perl_magic_get without other symptoms- '{tell$0;i${^LAST_FH}}'

Thread Previous
Tony Cook via RT
September 6, 2016 04:34
[perl #128263] Assert fail in Perl_magic_get without other symptoms- '{tell$0;i${^LAST_FH}}'
Message ID:
On Wed Aug 10 19:50:01 2016, sprout wrote:
> But rv2gv can sometimes return &PL_sv_undef.  To avoid a change in
> behaviour, I think a better fix would be to use
> if (PL_last_in_gv && PL_last_in_gv != &PL_sv_undef) {
> in mg.c (and to leave the assertion as-is, since having PL_last_in_gv
> set to anything else is a bug we want to be alerted about).

With that change (with a cast to make the pointers the same type),
should this from pp_readline be simplified?:

	    PL_last_in_gv = MUTABLE_GV(*PL_stack_sp--);
	    if (PL_last_in_gv == (GV *)&PL_sv_undef)
		PL_last_in_gv = NULL;


via perlbug:  queue: perl5 status: open

Thread Previous Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at | Group listing | About