This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
stop the eliding of void $pkg_var from assert fail
authorDavid Mitchell <davem@iabyn.com>
Wed, 9 Dec 2015 12:34:45 +0000 (12:34 +0000)
committerDavid Mitchell <davem@iabyn.com>
Wed, 9 Dec 2015 13:03:13 +0000 (13:03 +0000)
commitf5885b07157e0d620d9ba882ed3c69be62651b61
tree726d827b113c5bdb10d2fedcdae7134eac9c3c47
parentd528804abb10f4a7df33f93d35cd70c46de58e60
stop the eliding of void $pkg_var from assert fail

The code to eliminate things like our($foo); from the runtime op_next
chain in rpeep() caused the oldoldop, oldop, o vars not to form a chain of
3 adjacent ops. Instead, oldoldop and oldop ended up equal, which later
caused an assertion failure in the padrange code for something like

    my($a,$b),$x,my($c,$d);
op.c
t/op/my.t