diff options
| author | David Mitchell <davem@iabyn.com> | 2019-09-18 12:28:18 +0100 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2019-09-19 08:42:46 +0100 |
| commit | 4176abf7a8e425113debe55679c99b59bb9d299a (patch) | |
| tree | f8950218aeee9cad215793ef9cba187c8d24a207 /ext/Devel-Peek/t | |
| parent | 068b48acd4bdf9e7c69b87f4ba838bdff035053c (diff) | |
| download | perl-4176abf7a8e425113debe55679c99b59bb9d299a.tar.gz | |
set VOID on OP_ENTER
The OP_ENTER planted at the start of a program (and possibly elsewhere)
gets left as UNKNOWN context rather than VOID context, due to op_scope()
not honouring the current context.
Fixing this makes things infinitesimally faster.
Diffstat (limited to 'ext/Devel-Peek/t')
| -rw-r--r-- | ext/Devel-Peek/t/Peek.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ext/Devel-Peek/t/Peek.t b/ext/Devel-Peek/t/Peek.t index f3f781ac6b..fbcda76433 100644 --- a/ext/Devel-Peek/t/Peek.t +++ b/ext/Devel-Peek/t/Peek.t @@ -1465,7 +1465,7 @@ dumpindent is 4 at -e line 1. REFCNT = 1 | 2 +--enter OP(0xNNN) ===> 3 [nextstate 0xNNN] - | FLAGS = (UNKNOWN,SLABBED,MORESIB) + | FLAGS = (VOID,SLABBED,MORESIB) | 3 +--nextstate COP(0xNNN) ===> 4 [pushmark 0xNNN] | FLAGS = (VOID,SLABBED,MORESIB) |