diff options
| author | Gerard Goossen <gerard@ggoossen.net> | 2009-11-12 14:36:30 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgs@consttype.org> | 2009-11-12 16:25:36 +0100 |
| commit | 6ca4bbc9a415cdf2e94ea02c48bc7d0fb5c1b2df (patch) | |
| tree | b94cf802db4684ceeea9c0ab68653bbf497bf407 /ext/POSIX/POSIX.xs | |
| parent | d343c3ef4538135207ab69cd65d1bb1ef5403ccc (diff) | |
| download | perl-6ca4bbc9a415cdf2e94ea02c48bc7d0fb5c1b2df.tar.gz | |
Add missing LEAVE to POSIX.xs sigaction
Diffstat (limited to 'ext/POSIX/POSIX.xs')
| -rw-r--r-- | ext/POSIX/POSIX.xs | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/ext/POSIX/POSIX.xs b/ext/POSIX/POSIX.xs index 5b7ade69ce..d30a7529b6 100644 --- a/ext/POSIX/POSIX.xs +++ b/ext/POSIX/POSIX.xs @@ -1421,8 +1421,10 @@ sigaction(sig, optaction, oldaction = 0) sv_setpvs(*svp, "DEFAULT"); } RETVAL = sigaction(sig, (struct sigaction *)0, & oact); - if(RETVAL == -1) + if(RETVAL == -1) { + LEAVE; XSRETURN_UNDEF; + } /* Get back the mask. */ svp = hv_fetchs(oldaction, "MASK", TRUE); if (sv_isa(*svp, "POSIX::SigSet")) { @@ -1502,8 +1504,10 @@ sigaction(sig, optaction, oldaction = 0) * essentially meaningless anyway. */ RETVAL = sigaction(sig, & act, (struct sigaction *)0); - if(RETVAL == -1) + if(RETVAL == -1) { + LEAVE; XSRETURN_UNDEF; + } } LEAVE; |