summaryrefslogtreecommitdiff
path: root/XSUB.h
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2012-09-26 13:12:57 -0700
committerFather Chrysostomos <sprout@cpan.org>2012-09-26 13:13:54 -0700
commitd699ecb701ac42e5f50b4ec00c162c4dc9532b91 (patch)
treec3dd99b645b5c7aa5c5de7815437a607c0aaf48b /XSUB.h
parent02c01adb33bc4dde0147539d95b275937329f6c4 (diff)
downloadperl-d699ecb701ac42e5f50b4ec00c162c4dc9532b91.tar.gz
Restore special blocks to working order
I accidentally broke these in commit 85ffec3682, yet everything passed for me under threads+mad. PL_compcv is usually restored to its previous value at the end of newATTRSUB when LEAVE_SCOPE is called. But BEGIN blocks are called before that. I needed PL_compcv to be restored to its previ- ous value before it was called, so I added LEAVE_SCOPE before process_special_blocks. But that caused the name to be freed before S_process_special_blocks got a chance to look at it. So I have now added a new parameter to S_process_special_blocks to allow *it* to call LEAVE_SCOPE after it determines that it is a BEGIN block, but before it calls it.
Diffstat (limited to 'XSUB.h')
0 files changed, 0 insertions, 0 deletions