diff options
| author | Vincent Pit <perl@profvince.com> | 2010-06-03 11:44:15 +0200 |
|---|---|---|
| committer | Vincent Pit <perl@profvince.com> | 2010-06-03 14:00:38 +0200 |
| commit | 789bd863840ef4ff6c46f7c2ee0f3f64e0b5daa6 (patch) | |
| tree | 547efad230cfa3f03e5c971600e394627beb62f3 /embed.fnc | |
| parent | 540810e8986e170e75f4b34a7ca1f1dd5b0da3c4 (diff) | |
| download | perl-789bd863840ef4ff6c46f7c2ee0f3f64e0b5daa6.tar.gz | |
Make pp_reverse fetch the lexical $_ from the correct pad
This is achieved by introducing a new find_rundefsv() function in pad.c
This fixes [perl #75436].
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -856,6 +856,8 @@ p |PADOFFSET|allocmy |NN const char *const name|const STRLEN len\ : Used in op.c and toke.c AMpdR |PADOFFSET|pad_findmy |NN const char* name|STRLEN len|U32 flags Ap |PADOFFSET|find_rundefsvoffset | +: Used in pp.c +Ap |SV* |find_rundefsv | : Used in perly.y pR |OP* |oopsAV |NN OP* o : Used in perly.y |