This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 7ed7fd5) | patch
threads.xs: create new static fn S_jmpenv_run()
authorDavid Mitchell <davem@iabyn.com>
Fri, 4 Mar 2016 17:36:57 +0000 (17:36 +0000)
committerDavid Mitchell <davem@iabyn.com>
Fri, 4 Mar 2016 21:07:54 +0000 (21:07 +0000)
commit9fbaf8bcf9b8d75e5110446b50b2c497b6678d90
treebe54ddedb3c22b22e144de94819b21a448486acctree | snapshot
parent7ed7fd5e2ca6645508a1597fe3196e916c85c1c4commit | diff
threads.xs: create new static fn S_jmpenv_run()

S_jmpenv_run() replaces 3 similar pieces of code that do
JMPENV_PUSH(); ... stuff ...; JMPENV_POP().

As a side effect of this commit, it gets rid of this annoying warning
under g++:

    warning: variable ‘my_perl’ might be clobbered by ‘longjmp’
dist/threads/lib/threads.pm diff | blob | blame | history
dist/threads/threads.xs diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.