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: 5648c0a) | patch
stop after first del_backref
authorDavid Mitchell <davem@iabyn.com>
Sun, 1 Aug 2010 20:30:33 +0000 (21:30 +0100)
committerDavid Mitchell <davem@iabyn.com>
Sun, 1 Aug 2010 20:47:31 +0000 (21:47 +0100)
commit254f8c6a9916f4297b168b36bc9322d6736f1722
treeb74a61c0cf1e89afc994105b2a32e607ed5fa23dtree | snapshot
parent5648c0ae71de0db3ebfb4199727bc21e89c146c0commit | diff
stop after first del_backref

When deleting a backreference, there should be only one matching entry.
For normal builds sop after the first one; under DEBUGGING, look for more,
then assert only one found.

The previous behaviour was to unconditionally scan the whole array and
not assert that anything was found.
sv.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.