This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
rpeep: maintain chain when del extra nextstates
authorDavid Mitchell <davem@iabyn.com>
Wed, 9 Dec 2015 13:51:22 +0000 (13:51 +0000)
committerDavid Mitchell <davem@iabyn.com>
Wed, 9 Dec 2015 14:29:35 +0000 (14:29 +0000)
commit58e8b84f23648f1da33b7d173f437a8bcae6e548
tree402d58fc0c44c0564be1f2bde46b741b06fa4bba
parentf5885b07157e0d620d9ba882ed3c69be62651b61
rpeep: maintain chain when del extra nextstates

There's code in rpeep() that eliminates duplicate nextstate ops.
E.g.

    FOO -> NEXTSTATE1 -> NULL -> ... -> NULL -> NEXTSTATE2 -> ...

becomes

    FOO --------------------------------------> NEXTSTATE2 -> ...

This code didn't leave oldoldop -> oldop -> o as a consistent chain of
adjacent op_next ops.
op.c