Branch: refs/heads/blead
Home: https://github.com/Perl/perl5
Commit: 1ff13a08be65e3dd2618f9a2abea3e4e2990d89c
https://github.com/Perl/perl5/commit/1ff13a08be65e3dd2618f9a2abea3e4e2990d89c
Author: David Mitchell <da...@iabyn.com>
Date: 2023-09-08 (Fri, 08 Sep 2023)
Changed paths:
M pp_ctl.c
Log Message:
-----------
pp_caller/@DB::args: fix fail under -DPERL_POISON
v5.39.1-335-gd2cddbe1df added a fix and test when copying elements of a
sub's arg into @DB::args, to skip freed SVs, i.e. ones whose RC==0.
However, under -DPERL_POISON builds, such SVs can have a "reference
count" of 0xabababab... . So in addition, check for SvIS_FREED().
This fixes recent smoke failures under -DPERL_POISON.
