This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: e312a16) | patch
Perl_deb_stack_all() - handle CXt_SUBST better
authorDavid Mitchell <davem@iabyn.com>
Wed, 24 Aug 2016 15:28:00 +0000 (16:28 +0100)
committerDavid Mitchell <davem@iabyn.com>
Thu, 25 Aug 2016 15:03:16 +0000 (16:03 +0100)
commit5ef710896f62c2e11e9da401acb3247cd70ee203
tree74212f9d15704971b0897ee9dd141dbcfdf27e12tree | snapshot
parente312a16a9a796750ffb4cabee5a48b7ff7030437commit | diff
Perl_deb_stack_all() - handle CXt_SUBST better

RT #129029

There's a loop which skips CXt_SUBST context entries - but it
wasn't checking that the *current* cx is that type, but instead
was always checking the base cx and was effectively a noop

Also fixup a few code comments in that function.
deb.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.