diff options
| author | Tony Cook <tony@develop-help.com> | 2014-07-14 10:40:47 +1000 |
|---|---|---|
| committer | Tony Cook <tony@develop-help.com> | 2014-08-11 09:32:09 +1000 |
| commit | 3969ff3f8e4bff4c0c8d6577220d61d3962a9f56 (patch) | |
| tree | 06f582e9b71d22ddde6875630668a74ff30656cc /embed.fnc | |
| parent | 2806bfd899e5e4e1c29077c080a6a9ebc3512295 (diff) | |
| download | perl-3969ff3f8e4bff4c0c8d6577220d61d3962a9f56.tar.gz | |
[perl #122107] ensure that BEGIN blocks with errors don't remain named subs
Diffstat (limited to 'embed.fnc')
| -rw-r--r-- | embed.fnc | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -1934,6 +1934,8 @@ s |OP* |ref_array_or_hash|NULLOK OP* cond s |void |process_special_blocks |I32 floor \ |NN const char *const fullname\ |NN GV *const gv|NN CV *const cv +s |void |clear_special_blocks |NN const char *const fullname\ + |NN GV *const gv|NN CV *const cv #endif Xpa |void* |Slab_Alloc |size_t sz Xp |void |Slab_Free |NN void *op |