This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
panic if a freed op is called
authorDavid Mitchell <davem@iabyn.com>
Wed, 4 Oct 2017 10:29:40 +0000 (11:29 +0100)
committerDavid Mitchell <davem@iabyn.com>
Tue, 31 Oct 2017 15:31:26 +0000 (15:31 +0000)
commitc5cd8daba93e6e90ef628d395efeb1a86afeb705
treecbacf992bd76e27c2fdfde3905dc58e5d568cd31
parentf802a8256358e1dd0719a551da86078fe5d1c5c0
panic if a freed op is called

On debugging builds, when freeing an op, set its op_ppaddr to point to
a function which dies. That way if a freed op accidentally remains in the
execution path, you'll know immediately, rather than crashing sometime
later with a stack underflow or whatever.
op.c