]> git.vpit.fr Git - perl/modules/Scope-Upper.git/commit
Fix goto &xsub in uplevel
authorVincent Pit <vince@profvince.com>
Sun, 2 Oct 2011 21:00:53 +0000 (23:00 +0200)
committerVincent Pit <vince@profvince.com>
Sun, 2 Oct 2011 21:09:42 +0000 (23:09 +0200)
commitcd2c11568010f16946d259e1f024774e5360cf4a
tree1daa656696679c2d5b91cb79115b6705ad131749
parent44b173f9220cfdd1afd01ae4baf414f885d2f0b2
Fix goto &xsub in uplevel

The old debugging hack has been removed, because it could not cope at all
with the XSUB case. It is replaced by an runloop hijack.

Note that a side effect of this change is that su_uplevel_ud tokens are no
longer freed by su_uplevel_restore on pre-5.13.7 perls. This is needed in
order to ensure that the topmost token is available at all time for our
runloop replacement.
Upper.xs
lib/Scope/Upper.pm
t/61-uplevel-args.t