diff options
| author | Zefram <zefram@fysh.org> | 2010-04-21 00:00:09 +0100 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2010-04-25 13:24:29 +0100 |
| commit | febb3a6d221072614a4dcfef3d3953e212e5cf6c (patch) | |
| tree | 77ef0076d97be14c024406d9012b49db19234ad2 /embedvar.h | |
| parent | db93c0c46b34e8b2e37c671b7362d0fa2550f5f7 (diff) | |
| download | perl-febb3a6d221072614a4dcfef3d3953e212e5cf6c.tar.gz | |
unwinding target nominated by separate global
When unwinding due to die, the new global PL_restartjmpenv points
to the JMP_ENV at which longjmping should stop and control should
be transferred to PL_restartop. This replaces the previous
use of cxstack[cxstack_ix+1].blk_eval.cur_top_env, located in a
nominally-discarded context frame.
Diffstat (limited to 'embedvar.h')
| -rw-r--r-- | embedvar.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/embedvar.h b/embedvar.h index 63ed46ee2a..609e107ff0 100644 --- a/embedvar.h +++ b/embedvar.h @@ -254,6 +254,7 @@ #define PL_rehash_seed (vTHX->Irehash_seed) #define PL_rehash_seed_set (vTHX->Irehash_seed_set) #define PL_replgv (vTHX->Ireplgv) +#define PL_restartjmpenv (vTHX->Irestartjmpenv) #define PL_restartop (vTHX->Irestartop) #define PL_rs (vTHX->Irs) #define PL_runops (vTHX->Irunops) @@ -581,6 +582,7 @@ #define PL_Irehash_seed PL_rehash_seed #define PL_Irehash_seed_set PL_rehash_seed_set #define PL_Ireplgv PL_replgv +#define PL_Irestartjmpenv PL_restartjmpenv #define PL_Irestartop PL_restartop #define PL_Irs PL_rs #define PL_Irunops PL_runops |